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COMPUTEI’s 
Second Book Of 
Commodore 64 


$22.95 

275 pages, spiral bound 
ISBN 0-942386-21-3 


$22.95 

264 pages, spiral bound 
ISBN 0-942386-20-5 


$22.95 
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Mapping The 
Commodore 64 

$25.95 

ISBN 0-942386-23-X 


All About The 
Commodore 64: 
Volume I 


Commodore 64 
Games For Kids 
$22.95 

280 pages, spiral bound 
ISBN 0-942386-37-X 

COMPUTEI’s new titles bring you sales results. Our books regularly top t 
computer book best seller lists. We bring you popular, best sel ing tlt 
each month and back our books with sales and merchandising assistan 

Give Maureen Murphy a call at (02)4393633 and find out more about 

our newest titles 


too 95 

ISBN 0-942386-40-X 


COMPUTE! Publications,lnc.@i 


Distributed by: 

CBS HOLT-SAUNDERS 
ARTARMON, NSW 2064 
Dhnno ff)9) 439 3633 

















































EDITORIAL 

MERVYN BEAMISH 



COVER: 

BIG MOUTH our special 
COMMODORE MAGAZINE, voice 
synthesiser for the Commodore 64, 
offer in this issue. Page 20 


BACK ISSUES 


Volume 4, No 1 
Volume 4, No 2 
Volume 4, No 3 


AVAILABLE 
LIMITED ISSUES 
AVAILABLE 


W ell here is your bumperChristmas 84 issue as promised. 

A few of you may have come across us for the first time on 
the newsagent’s stand. Welcome. We are usually only available 
by subscription. A small number of the COMMODORE 
MAGAZINE will, in future, be released to newsagents but we will 
primarily remain a subscription base magazine. If you like us 
- SUBSCRIBE and be sure of your next issue. 

The New Year has a lot of good things in store for you, the 
reader. Hang in there! 


Commodore, contrary to the prophets of doom, just seems 
to grow and grow. I believe their market share is in the area 
of 40%. If you think of the options available to the micro¬ 
computer buyer this is a rather incredible bit of marketing. 
The product is not too bad either! Affordable prices and massive 
software support are major factors in this success story. 
However along with the swish new packaging, the innovative 
marketing and sales support from the chain stores and big 
discounters we receive an increase (small but noticeable) 
in letters complaining of lack of dealer support. These generally 
relate back to the big discounters. 


Commodore buyers are no different to other consumers and 
are attracted by cheaper prices but often the difference 
between the discounted and recommended retail price is the 
difference between service and disinterest. 

\iFXT ISSUE will be a STRATEGIC and ADVENTURE GAMES 
special. We will commence a multipart series on ADVENTURE 
i/VRITING and return to Greg’s USING SID series. More from 
Paul on RELATIVE FILES and of course Michaels Vic 
MAGICIAN’S APPRENTICE. We hope to see a return of our 
HIGH SCORE column and there will be more program 
i i.qtingS for vou to enter and run. 


rnm us all at KIM BOOKS, Paul, Greg, Michael and myself, 
EST WISHES tor the festive season and see you m the New 
par - about mid february. 


Mervyn Beamish - EDITOR 
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STACK LIGHT 
RIFLE 

For Commodore 64 or VIC 20 


interface^M 



FREE CASSETTETAPE CONTAINING 

3 GAMES 


• This popular interface is now 
available for the Commodore 64. 


Light Pen 


★ Fits into the games port at the side 
of the CBM 64. 

★ Well known game “Concentration” 
or cassette tape supplied free. 

★ Hours of Fun with a wide range 
of software. 



• Prints ENHANCED Commodore graphics 
including reverse characters. 

• Prints 4 different type faces 

• Does not require any of your memory in 
your Commodore 64 or VIC 20. 


TURBOPRINT B16 Buffer 
for 

TURBOPRINT/GT 

WHY BE LIMITED BY THE 
SPEED ON YOUR PRINTER 


A 8400 character document would take 
about 10 minutes to print at 12 characters 
per second. This means your computer 
would be “locked up” until the last of the 
information had been sent to the printer. 
HOWEVER WITH A 16K or larger buffer 
and a Turboprint GT your computer would 
be free in less than 19 seconds!! 


DISTRIBUTED BY INTERFACEWARE Pty Ltd. 

8/303 Pacific Hwy. 

LINDFIELD 

N.S.W. 2070 


For your nearest dealer Ph: (02) 46 4374 
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COMMODORE 64 MACHINE 
LANGUAGE TUTORIAL 

by Paul Blair 

Introduction to Machine Language complete 
with listing that illustrates and will quickly 
demonstrate many of the points made in the text. 


9.95 


Accompanying 

Cassette $1 0.00 / Disk $11 


50 




DISK OFFER # 2 (Release late January 85) 

for Commodore 64 includes 

BASAD - Vol 4 No 4 

24HR TIMER & ALARM - Vol 4 No 3 

FILEUSER-Vol 4 No 4 


$ 9.50 (each) 

*P&P included 


MONAD MANUAL $5.00 


THE VIC FAMILY BOOK 

by Michael Spiteri 

Michael Spiteri’s first book is a collection of short 
and effective programs for the VIC. Programs to 
use in the home, work and play. A special section 
for adventure gamers and super expander 
cartridge owners. 


Special introductory offer 


0.50 


DISK OFFER # 1 

for Commodore 64 includes 

MONAD-Vol 4 No 2 & 3 
NICE LISTER-Vol 4 No 2 
DEMO PROGRAMS of TOTL BUSINESS 
VIDEO BASIC & PAINTPIC. 


ORDER FORM: l/We wish to order the following items 


COMMODORE64 ML TUTORIALS 19.95 



VIC FAMILY BOOK $10.50 



DISK OFFER #1 or # 2 



Book niusi arrompam rassriir or disk. 

Postage & packaging S3.00 * Not with Disks #1 & #2 ★ 



Name 


Address 


KiM 



82 Alexander Street. 
Crows Nest. N S W 2065. 
(02)439 1827 


Phone 

Q I enclose cheque for 

O Please charge my BANKCARD VISA MASTERCARD 

Expiry date 
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News Releases 


setups into the computer, which can then 
be handled by almost anyone. 

This makes the unit ideal for lighting in a 
chain of discotheques, for example. One 
engineer can do all the settings, and a junior 
or the Deejay (or'Veejay', nowadays) end can 
easily control the system. 

Current professional 24-channel lighting 
control desks cost about $2,600 while 36- 
channel desks cost $3,500. But these have to 
be run into a dimmer rack. Thus the cost fora 
30-channel system is about $5,300. 

The Commodore VIC-20 controlled system 
with its 40-channel dimmer rack costs around 
$5,000. 

Information on the 'MIDI' music interface 
or the 'Starlighter' light switcher, is available 
from, KOSMIC Concert Sound and Lighting, 
P.O. Box 10, Bently, W.A. 6102. Telephone 
(09) 361 1681 or 361 8981. 


SPEECH 64 


The Currah Speech 64 has been released 
onto the Australian market. 



Speech 64 is a speech synthesizer for the 
Commodore 64 computer. 

Developed and manufactured by Currah 
Computor Components in the UK, it is the 
third synthesizer produced by that company, 
the other units being for the Sinclair 
Spectrum and the VIC-20. 

Speech 64 is a hardware-based synth¬ 
esizer. It has an infinite vocabulary with any 
word being made up of sound syllables, 
called allophones. 


With the considerable experience gained 
from its previous designs, Currah has made 
the Speech 64 extremely easy to use. 

The unit plugs onto the expansion slot at 
the rear of the Commodore 64 and the sound 
is modulated onto the TV signal. 

A simple Basic command starts the 
computer talking and most words to be 
spoken are entered exactly as they read. 

Speech 64 provides an excellent educa¬ 
tional aid, allowing use in teaching-type 
programmes and providing a useful basis for 
speech analysis. The standard 'talking 
keyboard' feature is valuable in learning to 
type and introducing people with sight 
handicaps to computers. 

But Speech 64 will mostly be used for the 
fun of it. Lots of 'speechware' - software 
programmes incorporating Speech 64 
routines - is being released by top-rating UK 
software publishers. Several games are 
already available including PC Fuzz from 
Anirog. 

Speech 64 will have a recommended retail 
price of $69.00 in Australia. It is distributed by 
Dolphin Computers, Currah's representative 
in this country. 





j pi.111 ■) iii ■ A Basket Full of Software Values 

— ~ * s * i > at Chick-Size Prices? Eggs-Act ly 8 

Quality Software Ideal for the Commodore 64™ and VIC 20™ 

WORD PROCESSING — TOTL.TEXT produces and field definitions, multiple options, user de¬ 
documents. forms and letters with speed and fined report formulas. Integrates with other TOTL 
versatility. programs. 

BUSINESS ACCOUNTING — TOTL BUSINESS 




SPELLING CHECKER — TOTL SPELLER—a com 
piled spelling-checker with built-in die- . 

tionary that quickly proofreads and 
suggests correct spelling. I f 

MAILING LIST AND LABEL — TOTL. ^ ^ 
LABEL organizes mailing lists, collec- 3©FY^ 
tion catalogs, menus, all listing and 
sorting Merges with TOTL TEXT. 

DATABASE MANAGEMENT - TOTL 416 LOGAN R 

INFOMASTERfeaturesdynamic record p Df 
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MICROTUTOR 

Now you can have fun learning Maths and Spelling! 

• friendly robots guide the way * automatic score keeping always displayed 

• simple to operate no supervision needed * different levels of difficulty within each program 

Versions for the Commodore 64 and Vic 20 are available for the following titles 


Spelling 


Cassette 1: Year 2 Spelling (ages 7-8) 

Year 3 Spelling (ages 8-9) 

Cassette 2: Year 4 Spelling (ages 9-10) 

Year 5 Spelling (ages 10-11) 

Cassette3: Year6 Spelling (ages 11-12) 

Words in Social Studies (ages 11-13) 
Cassette 4: Words of Australia (ages 9-12) 
Words in Science (ages 7-12) 

Maths 


ISBN: 0949126999 
rrp $15.95 each programme 


A 


Cassette 1: Junior Plus (ages 4-8) 

Junior Minus (ages 5-9) 
Cassette 2: Junior Times (ages 6-12) 

Junior Divide (ages 7-12) 
Cassette 3: Addition (ages 5-12) 

Subtraction (ages 6-12) 
Cassette 4: Multiplication (ages 7-12) 
Division (ages 8-12) 

Cassette 5: Times tables (ages 7-12) 

Arithmetic problems (ages 7-12) 
Cassette 6: Metric length (ages 9-adult) 
Decimal fractions (ages 8-13) 
Cassette 7: Find x (ages 8-12) 

Long addition (ages 8-12) 


Pitman Education Software 
158 Bouverie Street, 

Carlton, Vic. 3053 
Ph. (03) 347 3055 

Please supply: 

Qty Title Computer Version 



Now you can have fun 
Seaming maths and 
spelling! 

‘ s' * > * • c 'w, * • ♦-* V* 




Freight charges: Single copies $1.50 2-3 copies $2.00 

4-5 copies $3.00 6 or more $5.00 


I enclose $.in payment (Cheque or money order) 

Name 

Address 

City State 


School orders should be made on an OFFICIAL ORDER FORM 



PITMAN EDUCATION SOFTWARE 


J 
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he likes simply by interrupting the game and making a few 
simple key strokes. Essentially the game uses only the 
(RET), (ESC or F7) and the (ARROW) keys to implement 
every decision. 


The computer handles all of the staffwork. Once an 
order is given (such as directing an airsquadron to attack 
a group of ships) the computer handles the arming and 
fuelling, the launching and formation of the air group, its 
flight to the target and the resolution of the attack. 



‘Carriers at War’ is an enormous program. There is 80K 
of machine code (with at least nine bits per byte!) driving 
the game and about 70K of data stored in the scenarios. 
The map, for example, uses one byte per hex which 
comes to 6K for the 6048 hexes used by every map. Other 
data occupies altogether some 18K. 


The most frustrating and persistant problem besetting 
us for the final six months has been memory allocation. A 
forgotten number of innovative and seemingly brilliant 
ideas have been stillborn due solely to the crushing 
constraint of the paltry 64K available to us. What we could 
have done with half a megabyte! 


The six historical scenarios (recreating the battles of 
the Coral Sea, Midway, Santa Cruz, Eastern Solomons 
and the Philippine Sea as well as the introductory 
scenario simulating the Pearl Harbour raid) portray pretty 
th ® ful1 ran 9e of Pacific carrier actions in the years 

?^ enU system we have developed for this game 
ws e player to issue orders to his forces at any time 


CARRIERS AT WAR is produced on diskfc 
the C64 by Strategic Studies Groui 
Sydney, retails at $50.00 and is availabl 
from most Commodore dealers. 


DESIGNERS NOTES 


by Ian Trout 

In January 1984 we decided not to proceed with a 
game which we had titled Task Force South’ (The 
Falklands War). We weren’t sure we knew enoug'h about 
naval combat to design a serious simulation about it. 

We decided to do something easy instead. 

War’ would only take a few months to finish since we 
so much about the period. Well, eleven months later 
know now what we didn’t know when we started. To do 
justice to any historical event requires a prodigious 
amount of work. Not only must the simulation work, it also 
must bear at least a passing resemblance to the events it 
purports to portray. 


‘Carriers at War* is a game for both historian and 
amateur. No prior knowledge is assumed and the 
introductory tutorial will provide a gentle initiation into 
the game’s mechanics. For the historian, ‘CAW’ is an 
active insight into history. The computer can be directed 
to command all the forces in a game allowing the 
observer to examine the consequences of various 
changes in the historical situation. 


The game system, and the huge amount of work put into 
it, is simple and accurate and the computer does a fine job 

of commanding whatever forces are placed under its 

m o nH 
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% VIP Terminal 

^ _ 

" s " Tele-Communications 
at: h iev System 

{ - ? by Greg Perry 


Since our review of the C64 compatible Cicada 300T 
modem a few months ago, a number of people have asked 
about terminal programs for communication between 
64s and between 64s and data bases. A number of public 
domain programs are available through user groups 
(including one in PASCAL), but until now these have 
either been of the ‘dumb terminal’ type, which simply 
emulate a mainframe terminal and do not allow file 
transfer, or the ‘slightly smart’ terminal which allows file 
transfer using a particular set of protocols. (Protocols are 
the particular characteristics of the terminal and espec¬ 
ially the file transfer method which provide some form of 
error detection to check if information is received succ¬ 
essfully.) 

The VIP TERMINAL program from Softlaw in the US is 
the first fully fledged communications package to appear 
on the Australian market and I am lead to believe that 
Commodore are about to release the package through 
their dealer network. The concept of the program is of the 
‘ultra smart’ type and includes task icons (pretty pictures), 
complete disk access commands, selectable session 
logging, selectable hardcopy outputs, programmable 
keys, four methods for program and sequential file 
transfers, clocks, alarms, and with the appropriate 
modem auto-dial, auto-answer, automatic electronic mail 
facility. In fact, it would appear to contain just about 
facility the writers could possibly think of! 


Overview 


Unfortunately, I have only had the program for a few 
days and the following is a report based on a few late 
night/early morning sessions. Some of the immediately 
useful features of the package are 

• Userfriendly menu driven program with task icons and 
several pop-up menus. 

• Selectable screen displays of either 40, 64, 80 and 
even 106 columns with narrow, medium or wide 
character sizes. 

® Four different protocols for upload and download of 
BASIC or ML programs or sequential files. 

• True logging of the complete on-line session using 
‘virtual memory’ disk access. 

« User ‘workspace’ of 7K for automatic logging or 
upload/download of text/programs and off-line editing 
of text. 


• Full off-line screen editor for text files. 

• Built-in clock and alarm. 

• VT52 mainframe terminal emulation available. 

• Selectable trapping of unwanted characters. 

• Hardcopy output to a wide range of printers. (But serial 
port only.) 

• Full disk handling commands. 

• User selectable RS-232 parameters between 50 and 
2400 (?) baud rates. 

Alright, enough of the free advertising I hear you say. 
But what does it actually do? 

Together with a C64 and a suitable modem connected 
to the RS-323 user port, this program provides a full 
communications system between you and the outside 
world so that you can access ‘data bases’ and ‘talk’ to 
other computer users. It provides many nice features 
which we have only read about and not seen on the 
Australian market. 

The program is actually only one of eight parts of the 
VIP Program Library (the rest of which I gather we will 
probably not see) and the quality of the program is 
evident as soon as you load the ‘desktop’ loader. This 
shows a desktop with computer, printer, disk drive etc, 
together with a shelf containing a row of programs. To 
load a selected program, one uses the joystick to move 
the image of a ‘hand’ to point to the desired program and 
then presses the joystick fire button. As the program 
loads, the 1541 drive light flashes and on the screen the 
light on the drive on the desktop also flashes in 
sequence! 

The main terminal program displays a row of ‘icons’ or 
pictures on the bottom of the screen and the various 
functions can be selected either from the function keys 
F1-F8 or by moving the ‘hand’ with the joystick. The hand 
even has built-in inertia, moving slowly at first then 
progressively more quickly. 

Eight main options are displayed. Pointing the hand 
and pressing ‘fire’ reveals 

Help: Various files are called from the main disk to 
explain the operation of the different parts of the program 
in easy stages. 

Options: Allows one to select the number of columns 
displayed on the screen in the terminal mode between 
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40, 64, 80 and 106, and other parameters such as 
colours, cursor blink, whether the key ‘clicks’ when 
pressed and so on. The wider column modes are 
surprisingly good with the 80 column mode being fairly 
readable even on a normal TV and the 64 column mode is 
excellent. The 106 (yes 106!) column mode is even 
vaguely readable on a monitor. 

Talk: The terminal mode is the interactive mode where 
you do the talking to other systems and uploading/down 
loading of files. Pressing the ‘C=’ key and ‘h’ brings up a 
help menu which allows you the select various sub¬ 
modes such as file transfer, disk logging, switch back to 
40 columns, turn on the printerfor hardcopy of the on-line 
session in real time, and a number of other facilities. 

Time: allows you to set the clock for date and time 
(which is automatically displayed at the top of the 
terminal mode screen) and to set an alarm. The system 
even allows quarter hourly chimes (- which remind you 
that you have to write another article to pay for this 
month’s phone bill !) 

Print: Select printer parameters for a range of printers. 

Keys: Allows you to set to 20 programmable keys each 
of which can be set to display a message of up to 127 
characters at the press of a key. This is very useful for 
holding your log-on usernames and passwords for 
various systems. After logging on, one simply presses, for 
example, ‘C— and ‘1’ to send your username and 
password. 

File: A complete file management menu to allow you to 
view the disk directory, scratch or rename files, view 
saved files, save, load, edit, clear you ‘user workspace’ 
etc. 

Telephone: Part of a full auto-dial facility which is not of 
much use to most users at present but is useful for storing 
up to 16 often used phone numbers and the terminal 
characteristics used by each system. 

Also the complete terminal ‘environment’ containing 
different settings for screen parameters and terminal 
characteristics can be saved to or loaded from disk. 


Using VIP TERMINAL 

Overall the program is quite a joy to use after some of 
the simpler programs around. It provides a wide range of 
useful facilities. One of the main features which I 
particularly like is the ability to selectively log the 
communication session. The process of logging means to 
save a copy of selected parts of the session and view it 
later at leisure. This is an extremely important money 
saving feature when using commercial data bases. It 
means that you can quickly scan several areas of a data 
base, keeping a complete copy of the bits in which you 
are interested (or the whole on-line session if you wish), 
log off to save money, then carefully examin? the 
information at some later time. 

VIP TERMINAL provides two methods of logging your 


sessions. The first and fastest, although slightly limited 
method is to log the session directly into the C64’s 
memory. This method provides area of 7K called the 
‘workspace’. This workspace area can be viewed, edited, 
and saved to disk. Small programs and text can also be 
loaded into the workspace and then transmitted directly. 
A good idea for letters and so on. The second logging 
method involves opening a disk file and using a 
technique called ‘virtual memory’ where all incoming and 
outgoing characters are automatically sent to the disk 
file. This method slows down the terminal mode since 
every so often the system has to wait for the 1541 to 
catch up! However, with this method, the length of 
sessions and files is only limited by the amount of free 
disk space. 

Four different protocols are provided for sending and 
receiving text and program files. I haven’t had the 
opportunity to test these out fully, but I quite easily 
transferred a copy of this review to a couple of people. 

The package seems to work well with only one minor 
problem - the system cannot correctly detect if the carrier 
signal from the modem is present. With the modem 
(CICADA) switched off, the words ‘carrier present’ appear 
but when you actually are on-line, the system things that 
carrier is not present. This should only be a problem for 
anyone using the auto-answer, auto-dial features. I am 
also told that this version has a timing defect which 
requires the user to enter two POKES before use, 
however it seemed to work ok for me. Commodore are 
apparently prepared to modify the software for local 
conditions if the product generates sufficient orders. 

The user manual and help files are well written and 
make a reasonable attempt at explaining all the facilities 
of the program as well as computer communications in 
general. 


Summary 

Undoubtedly the best communications package I have 
seen for the C64. One its most annoying features is that 
VIPTERMINAL hasa whole host of facilities such asauto 
answer and electronic dialing, automatic redialing if the 
number is engaged, graphics modes, BBS access, 
automatic electronic mail facility, and so on which we 
cannot take advantage of at present because of the limits 
of readily available technology. The program is also 
designed to support the Commodore 1600 and 1650 
modems but I’ve neverseen either! ‘Tis a pity Commodore 
in Australia doesn’t support communications more fully. 
Although it must be said that with the release of this 
program they appear to be moving in the right direction. 
Rumours also suggest some interesting developments 
may be in store for us in the near future when Telecom’s 
national Viatel videotext network comes on-line in the 
new year. Stay tuned! 

Available from Commodore Dealers as of mid 
November. Retailing at $100. 
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Christmas present suggestions for Commodore owners. 


HEATHROW 

Air Traffic Control 64 



If you’re tired of navigating spaces ships, flying planes 
and the like - ‘Have we got a job for YOOUI!” Become 
an Air Traffic Controller at busy Heathrow Airport. 
HEATHROW simulates as closely as possible the real- 
life operation of Air Traffic Control Radar at London 
Heathrow Airport. 

Yes it is a difficult game at first but it only took us about 
20 minute to get the gist of it and we were away- 
Heathrow this year has a record number of Concord 
crashes. I think we’ve wiped out more than the total 
ever produced. You see they couldn’t land because of 
the wrecked 747s on the runway! 

The best way to describe the game is to take you 
quickly through the ropes. By-the-by this is how you 
learn the game by watching a demo and comparing it to 
notes set out in the instruction leaflet. 

Overview 

Once into the demonstration the radar screen is 
displayed together with information on the aircraft. The 
aircraft arrive in four holding stacks which are radio 
beacons around which the aircraft fly in race track 
pattern. Air Traffic Control (ATC) then gives instruction 
to position the aircraft onto a pair of radio beams, called 
ILS (Instrument Landing System) with which the aircraft 
can complete the landing at Heathrow airport. 

Radar Screen 

The screen is a dark rectangle with four holding stacks 
shown as small white plus signs around which the 
aircraft (shown as white blocks with a trail of white dots) 
circle. 

In the centre of the screen is two short thick horizontal 
lines representing Heathrow and on either side are 
shown the extending centerlines of the double runways. 
The small dots on the centrelines are range marks 
located every two miles. 

Aircraft circle around the stacks. Above and to the right 
of each aircraft is a label produced by the Secondary 
Surveillance Radar (SSR). This label consists of a one 


letter callsign and one digit showing the altitude of the 
aircraft in 1000 feet eg. A6 means aircraft A at altitude 
between 6000 and 6999 feet. 

Stack Display 

To the right of the radar screen is the stack display. This 
shows information about each aircraft from the time it 
first appears on the radar until it lands. It is divided into 
four sections one for each holding stack. Each section 
lists aircraft name, type, altitude, speed, heading and 
other direction information 

There are five types: 
c Concord 

h Heavy jet (such as Boeing 747) 
m Medium jet (such as Trident) 
s Small propellor driven airliner 
I Light aircraft 

Each type has max and min speeds that must be 
adhered to and a ILS maximum speed. 

Radio Communication 

On the left hand side of the radar screen in a box 
marked RT, this is the equivalent of Heathrow radio 
communications. 

From here you can instruct the aircraft to maintain or 
alter altitude. If you ask the impossible a message will 
come up ‘BAD ALTITUDE’. When the altitude is altered 
the time it takes to achieve its new height 
is determined by the aircraft type. Instructions 
are accepted by the computer with the reply ‘ROGER’. 

The aircraft can be told to change their headings to the 
left or right to take up a new compass bearing - eg.A 
Left>240 means aircraft A turn from its present heading 
onto heading 240 degrees with a left hand turn. 

You can also control the speed through the RT section. 

“QUOTE” - This is a radio inquiry to an aircraft followed 
by one letter which specifies the information that is 
required - eg Quote ‘A will return 3.8 meaning aircraft A 
altitude = 3800 feet. 

Level 

There are seven levels of play in the game: 

1. Basic vector, slow traffic - light aircraft only. This is 
the best level to learn on. 

2. Mixed traffic with air space restrictions. 

3. Landing intervals and separation - increase in the 
things you have to worry about. 

4. Vortex spacing with outward bound aircraft. 

5. Emergency traffic. 

6. Additional problem - as if you need one! Unknown 
aircraft, loss of contact, loss of runway (all those 
wrecked 747s) etc. 

7. Random problem with extra outbounds - !!!! 

Comment 

This is a game for someone who has everything. Value 
for money is here because once hooked you’ll play it 
time after time. The screen is easy to read and the 
computer responsive to your commands. Don’t be 
fooled by the seemingly slow speed that the radar 
operates at. 

Excellent and entertaining game distributed by 
International Software Distributors of Bayswater Victoria 
retails at $19.95 and is available through most 
Commodore Dealers. 
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The Incredible Musical Keyboard 



If there is anything that is just a born natural for a 
C64 Christmas present it has to be the Incredible 
Musical Keyboard (IMK). 


All those things we have been told that the C64 can 
do with SID - the built in musical synthesiser, the 
sound effects, the combined graphics/sound capacity. 
Here they are! 


The producers claim, and I seem to have proved, that 
with no musical experience, you can unleash music that 
is hidden deep within your computer. 

At first it is very easy to dismiss the IMK as a gimmick 
and to the professional musician I don’t think the actual 
hardware content of the IMK will ever be anything but 
just that. 


However once you start into the demo programs, that 
are included on the disk and/or cassette, that comes 
with the IMK, you realise just how powerful a musical 
instrument you have at your finger tips. 

DEMOS 


There are four demo programs: 

☆ Kawasaki Rythm Rocker - A creative music program 
that offers a variety of electronic percussion and 
synthesiser sounds that you lay down on top of different 
pre-programmed bass lines. Or program in your own 
bass line and co-ordinate it all with hi-resolution 
graphics. 

☆ 3001 Sound Odyssey - A complete tutorial on music 
synthesis. Includes a sophisticated music synthesiser 
on which you can make your own music, create your 
own sound effects or simply experiment with any of the 
hundreds of preset sounds. 

☆ Kawasaki Synthesizer - A programmable synthesiser 
and sound processor. Menu driven and friendly two 
disk set including The Performer’ and The Composer’. 

☆ Music Processor - Create, edit, record, play and 
compose your own arrangements. It has joystick control 
and prints the notes onto the screen in full musical 
notation. 

The demo disk acts as an appetiser for all of the 
above which are purchased as separate add-ons to the 
IMK. 

Also in the package that your IMK comes in are two 
ooks of simple printed music for you to play. One 
includes keyboard stickers for the simple to use ‘Letter 
Music’ system. 

The IMK itself is a reasonably solid plastic sub¬ 


assembly that fits over the top of you existing keyboard. 
It is very simple to attach. I thought that it could have 
been a neater fit but it works like a charm. 

It is unfortunate that I could only get into the IMK 
program. The distributors sent us the IMK and Rythm 
Rocker packages but both tapes that accompanied 
these packages would not load into our machine. To be 
fair ours is a well worn datacassette but it seems 
strange that both cassettes would not load. 

The software package that comes with the IMK includes 
the demo programs and a keyboard program. This 
program allows your to utilise the keyboard straight 
away. It turns you computer into a three voice 
polyphonic synthesiser. Which means you can play 
three notes at the same time. 

Comment 

A fun machine. Both professionals and amateurs alike 
should take a serious look at the IMK and its add-ons. I 
felt that the IMK package itself really needed to include 
at least one of the add-on packages as part of the kit. If 
you are buying it for Christmas I suggest that you have 
the man at the shop do a test load of the cassette. 

I was very impressed with the unit and the price of 
$49.95 is not unreasonable, although with add-ons 
ranging from $24.95 to $49.95 a total setup could 
become quite expensive. 

□ □ □ □ 


Break Dancing on the 64 



This program will only just be in the shops before 
Christmas. 

Originality and flair is rare in software at the present 
what with the 205th new variation of Kong and Space 
Invaders and the like. This one is NEW! 

BREAKDANCE offers four different ways to enjoy the 
fun of breakin’. Each game offers a new challenge, and 
the ‘freedancing’ section will entertain you for hours. 

What happens is that there are sprites, in the form of 
dancers, on the screen that are programmed to 
move according to a sequence of numbers that you 
have entered ( a max of 14 dance steps combined into 
a max of 255 moves). Alternatively the joystick can 
control up to 9 movements instantaneously. Confused? 
Seeing is believing! 

The game comes in disk or cassette form, we have the 
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disk version, and there are five game options: 

1. Hot Foot Dance Contest - “Its only your first day in 
town, and the local b-boys already want to see your 
moves. They call you to the street corner dancing battle, 
no less. The hottest breaker in the neighborhood, Hot 
Feet, is here and he is ready to go down - he has lots of 
juice, but you can beat him if you concentrate and feel 
the rythm .... so don’t get wacked. 

The setting is a street scene and the object of the game 
is to repeat the moves using a joy stick of the other 
dancer controlled by the computer. 

2. Battle the Rocket Crew - Word spreads fast in the 
city-everybody’s heard about the moves you made 
when you burned Hot Feet. Now, the Rocket Crew has 
invaded your turf, challenging you to a battle. They’re 
moving down you street, pushing you towards the water 
front pier. If you can’t out dance them in time, you’ll fall 
of the edge of the pier. 

This game pits you against a gang of dancers and using 
the joystick again you must align yourself with a dancer 
and match his moves to ‘burn’ him before you move on 
to the next. 

3. Perfections Dance Puzzle - Now your getting good so 
good that nobody in the neighborhood will break with 
you - they’re sick of getting burned. Its time to match 
moves with Boogaloo Brewster...the one they call the 
king. 

In this game, you have to match a four, six or eight 
move routine performed by a computer controlled 
dancer. Numerical sequence matching is used in this 
game. 


4. Choreograph Your Own Dance - An invitation came 
today. You’re going to be in the city Breakdance 
Festival. This could be the break you’ve been waiting 
for, the chance to really show off. You choose the music 
and the routine. 

Make up your routine out of a combination of 14 
different moves and move around the stage under the 
control of a joystick. 

5. Grand Loop - This takes you through all four games 
in sequence. 

If you don’t understand what a Moonwalk is or a Suicide 
or if it comes to that, a boogaloo then there is a 
Breakdance Glossary in the instruction leaflet. 

With two joysticks ( get your friend to bring her own) 
one player can challenge and match skills with another. 
You can save a routine and hold a concert if you wish. 

Being of ‘mature’ age and as round as I am high the 
chance to breakdance without running out of breath is 
marvellous. 

Comment 

Definitely a breath of fresh air in the software market. 
Interesting, exciting and different. Good clean family fun. 

Distributed by CBS at a retail cost of $19.95 cassette 
and $29.95 disk. Available from most Commodore 
dealers. 



Computer Software Selection Hade Easy 


Spend more time in front of your 
computer and less time searching the stores 
for good software 

Join the STRATEGIC SOFTWARE CLUB 
and receive regular mailings of catalogues 
describing hundreds of quality programmes 
ail available to members 
AT THE RIGHT PRICE 

Membership is free and you qualify for 
frequent buyers discounts and participation 
in contest prizes and give-a-ways Join now 
by phoning Frank on (02) 957 6667 
or send your name and address to 
Freepost 67 

Strategic Software Club 
P.O. Box 742, North Sydney 2060 


NEW for COMMODORE 64 FAVOURITES for COMMODORE 64 



Key 


VIP Terminal 

The finest terminal software available for your Commodore 
64 Talk to any computer and most of the bulletin boards 50 
to 2400 baud operation simultaneous on-line printing and 
saving of files to disk 40-64 80-106 column screen display 
without any hardware change Easy to use for the novice 
lust look at the task icons on screen ana press a key D-S90.00 

PFS File. 

Easy to use information management system that records 
files sorts and retrieves information Allows users to design 
the r own forms on screen Requires no previous computer 
experience D-115.00 

Wordcraft 64 

The professional wordprocessing programme for the 
Commodore 64 or Executive SX 64 Incorporates the 
powerful features for which this programme is renowned 
world wide Wo'dcraft >s d steal v C D-95.00 

Hes Games 

Participate m 6 world class events Sprints hurdles d»vmg 
archery weightlifting long jump There s even an instant 
replay feature D-56.99 

Cave of the Word Wizard 

An excellent intriguing wav to develop spelling skills This 
programme includes 500 spoken words m 10 spelling levels 
and the Wizard actually talks to vou 'O clear human speech 
Top seller Ages 8 to Adult D-28.50 

Murder by the Dozen 

Mystery buffs can put their powers of deduction to the test 
Twelve tangled webs of Crime ana Puzzlement with 700 
dues 1-4 players D-37.95 

Pogo Joe 

Golden Fluffy Award Most original award game C E S US 
iqflj Pogo Joe bounces merrily away >ver J2s ree 
I ed by all sons of r T-28.99. D-33.99 

D-Disk C Cartridge T Tape tCassette i Delivery Australia wide 


Aztec Challenge 

Asylum 

Agent USA 

Bank Street Writer 

Beyond Castle Woifenstem 

Bruce Lee 

Blue Max 

Beach Head 

Cave of the Word Wizard 

64 Doctor 

Early Games Senes 
Flight Simulator II 
Grandmaster 
Hamer Attack 

Heathrow Air Traffic Control 
How About a Nice Game of Chess 
Home Accounts Manager 
Lode Runner 
Mat* i Mileage 
Multiplan 

Muppct Learning Keys 
Olymic Skier 
One World 
Pit Stop 


T 23 50 D-32 95 
T 33 50 D39 95 
D 49 95 
D 74 50 
D-49 95 
T 36 95 
D 36 95 
T & D 36 95 
D 28 50 
T & D 49 00 
ea D 42 50 
D ’5 95 
T 24 95 D 29 95 
T 18 95 
T 18 95 
D 45 00 
D 55 50 
D 39 95 
D 3'99 
D 139 00 
88 00 
T 18 85 D 23 95 
D 1 19 00 
D 38 95 
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SHERLOCK 64 


Be the world’s greatest sleuth - in the most advanced 
and challenging adventure game ever. 

For the first time ever, an adventure game in which 
you can talk with intelligent characters, ask them 
questions and argue with their conclusions - all in 
everyday English sentences. 

Work against time to solve the mystery as you travel 
about Victorian England. Villians, suspects and witnesses 
all live out their lives in a realistic manner, and you can 
never be sure of who or what you will find anywhere. 




You must be alert because nobody is above suspicion. 

In ‘Sherlock’, the world of the famous private detective 
comes vividly to life. Time passes naturally, day turns to 
5 night, racing towards the inescapable deadline. You 
must ensure Sherlock has sufficient time for sleep, 
money to travel on public transport and other 
necessities. And you can rely on Dr. Watson to help you 
collate information, or gather clues. 

SPECIAL FEATURES OF SHERLOCK 

★ Sherlock, for the first time in any adventure, allows 
the player to enter into a dialogue with some of the 
characters and to question them about their motives 
and reactions. 

★ It’s ability to accept full English sentences. 

★ The ability to make suggestions to the other 
characters in the adventure as to what they should do. 

★ The independence of the other characters in the 
adventure. 

★ The use of high resolution graphics in a complex 
adventure game. 

★ All the characters that the player will encounter in 
Sherlock have complex and well defined personalities 
of their own, making this truly the most sophisticated 
adventure game ever published. 

★ In this adventure you can write notes and receive 
notes. This makes it possible to communicate with other 
characters who may be in totally different locations by 
writing a note to them and sending it with a courier. 

★ A real time clock is used in the program and time 
passes in a natural manner. 

★ The entire adventure also has a built in time limit- 


exactly how long is for the player to determine as he 
plays the game. 

★ The realism of Sherlock’s England has been recreated 
to a very high degree. 

Fear not the game does not take ages to LOAD of 
cassette because its on a cassette using Pavloda and 
LOADS in a very short time. The game comes in an 
attractive box with newspaper clippings - from the 
TIMES (or is it the OBSERVER?) my dear Watson train 
time tables and instructions. 

We haven’t done a proper review on this one because it 
needs more time than we had for this issue. Commodore 
Magazine volume 4 number 5 is an ADVENTURE 
GAMES issue and we‘ll attempt to do this game justice 
then. 

A quick play however showed the game to be engrossing 
and innovative. We came across a curious gotcha - if 
you say ‘OPEN DOOR’ (or a similar command) the 
computer is apt to reply ‘WHICH DOOR?’. Now if you 
don’t know which one and you enter ‘LOOK’, or some 
other statement unrelated to the computer's question, it 
is highly probable that the screen will freeze and you 
have to start all over again! This gotcha is a little 
annoying but does little to spoil the game - just be 
careful and SAVE at regular intervals. A knowledge or 
street map of inner London would be of assistance. 

Available for the C64 from most Commodore dealers at 
$39.95. Distributed by Melbourne House. 

□ □ □ □ 


Catcha Snatcha for the VIC-20 



CATCHA SNATCHA brings you the mad world of the 
maddest supermarket in the world. Using your trusty 
joystick or even trustier finger tips you become Barney 
Bootlac. Poor Barney, he has been demoted from Ace 
shop detective to zero. You - sorry I mean Barney - 
are/is trying desperately to climb back up the ladder of 
success by showing the boss how efficient he is. 

There are hordes of harassed housewives doing there 
weekly shopping, there is lost property for you to collect 
and take to the lost property room and lost kids to take 
to the lost kids room. 

Of course there is the shop lifters and an occasional 
parcel bomber to deal with. All the time the boss is 
watching your process. When he awards you 99% you 
can go up a level. 

Life wasn’t meant to be easy! Well it sure isn’t for 
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Barney up to work by 9 a.m and home at 8 p.m. I 
wonder if he is in a union? 

The VIC 20 must be one of the most supported micro 
computers in the area of computer games - CATHA 
SNATCHA is only one of them but one of the better 
ones. Easy to play, fast moving and joystick optional 

CATCHA SNATCHA is distributed by Corgi Bantam 
retails at $ 1 2.95 and is available through most 
Commodore dealers. 

□ □ □ □ 


SUPER CHAMP 
a joystick for a man! 


SUPER CHAMP is a most impressive looking joystick. It 
does not add to that mangrove swamp of cords 
surrounding your computer because it has a 10 -ft. 
retractable cable. 



Compared to other sticks I’ve seem this is a giant - you 
can get a good firm grip on this one. Left or right 
handed, with SUPER CHAMP’S two fire button positions, 
you’ll find it easy to use. 

The thing I noticed straight off was its sensitivity. When 
you moved the thing it moved it did not seem to hang 
around for a consensus of opinion like others I’ve used. 

The stick has a nice firm grip and very solid suction 
fixing for those who don’t like hand holding. 

There is very little you can write about a joystick - does 
it work [yesj. Do I think it is of solid construction? [yes]. 

Is it ergonomically sound [yes]. In short this joystick 
looks good. 

SUPER CHAMP was sent to us by Computerplay - 
SCISYS of Wheeler Hill, Victoria it retails for a low 
$ 29.95 and I believe it is generally available through 
computer retailers. 

P.S. It has a very good feature in a 360 degree swivel 
handle. 


Colossus Chess for the 64 


As long as there have been microcomputers there has 
been chess software. Now we have one of the latest 
and the producers claim the greatest. But they back up 
their claims. 

“Colossus 2.0 has been tested against numerous 
other chess programs and has beaten them all. In the 
tests, sixteen games were played, on various levels, with 
an equal number of whites and blacks for each 
program. One point was awarded for a win, half a point 
for a draw, no points for a loss. The results of these 
tests were as follows: 

Colossus 2.0 beat the following programs by: 

White-Knight Mkll - BBC Productions - BBC - 11.5 

Superchess 3.0 - CP-Software - Spectrum - 1 2.4 

Grandmaster - Audiogenic - CBM 64-12.4 

Cyrus IS Chess - Sinclair - Spectrum - 13.3 

Spectrum Chess II - Artie - Spectrum - 14.2 

Chess - Acomsoft - BBC - 16.0 

Chess - Bug-Byte - BBC - 16.0 

Chess - Computer Concepts - BBC - 16.0 

Chess - Program Power - BBC - 16.0 

Chess - Atari - Atari - 16.0 

Chess - Oric - Oric - 16.0 

Chess - Psion - Spectrum - 16.0 

Master Chess - Mikro-Gen - Spectrum - 16.0 

Sargon 2.0 - Hayden - Apple 11-16.0 

ZX chess - Artie - ZX81 - 16.0 

Note: White-Knight was the 1983 Home Computer Euro¬ 
pean Champion!!!” 

O.K. having established its pedigree how does it go. 

Not being a chess player I called in Frank Said a player 
who, by his own admission, is not a Russian Grand 
Master - “l‘m fairly average really.” That makes him just 
the right person to check this unit out. 

Frank is somewhat wary of any of this new technology 
guff. He brought his traditional chess board along just 
so the evening wouldn’t be wasted. 

Within 15 minutes of starting the game he was 
mesmerised. Eventually he made a few comments. 

★ It plays an interesting game. (!) 

★ Impressed with its automatic castleing moves. 

★ The screen is easy to read and has a minimum of 
glare (you can change the colour if you wish.) 

★ Frank liked the ability to move backwards retracing 
his steps to find his mistakes, or replay a certain move. 
You can also move forward again to get back to where 
you were. There is a facility for the computer to replay a 
game from the start so that you can retrace a total 
game. 

★ In Frank’s case he noted that the program played a 
blocking rather than grabbing game. Later on we 
reduced the time limit for the computer to make its 
move and it started grabbing. 

★ The computer seemed to make unorthodox moves 
especially with longer move times - shorten the time 
and there were less surprises. Colossus chess has an 
openings ‘book’ of about 3,000 positions, which is used 
to play the first few moves. 

★ Excellent learning tool. 
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★ Tended to start like a game of draughts - about a 
week later we had a member of the local chess club 
here and he made a similar comment. 

★ We had a degree of trouble getting Colossus to 
solve Mate in 2 problems. The computer, I feel sure, 
could do it but the instructions were not all that clear on 
how to go about it. 

Consensus of non computerist opinion 

Colossus chess is the best electronic chess game our 
reviewers have seen. “Beats anything we’ve got at the 
club.” 

It has a wide range of features and offers any number 
of levels of play - this can be achieved by adjusting the 
‘Move Time.’ and/or selecting one of six playing modes. 

Play by mail chess gamers will be glad to hear that you 
can save your game to tape and in infinity mode give 
Colussus all night to decide the next move if necessary. 

Chess players who have used Colossus have agreed to 
a man that it plays a tough and ‘interesting’ game and 
offers a serious challenge. 

Distributed by Corgi & Bantam, retails at $39.95 disk 
$29.95 cassette and is available through most 
Commodore dealers. 

□ □ □ □ 


What a - 
BIG MOUTH 
this 64 has! 


by Richard Chalmer 

I’ve had a Speech Synthesiser, in the form of a plug-in 
cartridge, knocking around in my draw since I got my 
first VIC many moons ago. I played the demo-tape and 
was suitably impressed. I then went to the operator’s 
manual and my enthusiasm went. 

To get this cartridge to work one needed to know an 
alphamnemonic code and all in all it was quite complicated. 
Maybe good for the serious programmer but too 
bothersome for a hack like me. 

It was with a certain amount of negative attitude that I 
loaded up ‘BIG MOUTH’. But quite soon after pressing 
SHIFT/RUN STOP my monitor emitted a cheery- 
“THANK YOU FOR BUYING BIG MOUTH” 

The ‘DEMO’ program instilled more confidence as, in its 
own words, my C64 told me what its BIG MOUTH could 
do. It informed me that: 

★ It was a smooth talker- v/ 

★ That it had variable pitched voice control - v 7 

★ That I could vary the speed at which it talked - 

★ That I would have fun using BIG MOUTH - v / 

In anticipation I LISTed the demo and my enthusiasm 
started to fluctuate. 

5 POKE 39439,60: POKE 39438,60 
10 SPK'THANK YEW FOR BYING BIG MOUTH” 

20 SPK“EYE AM SHURE THAT YEW WILL BE PLEEZED WITH 
MEEE” 

30 SPK" AS YEW CAN HEAR,EYE AM QUITE,A SMOOTH 
TAWKER” 

35 FOR F=| TO 200: NEXT : POKE 39439,40 



40 SPK“YEW CAN MAKE MY VOYCE HY” 

45 FOR F=1 TO 200: NEXT : POKE 39439,80 
50 SPK“OR YEW CAN MAKE IT LOW” 

55 POKE 39439,60: POKE 39438,40 

60 SPK'TF YEW WANT EYE CAN TAWK.KWIKLY" 

65 POKE 39438,80 

70 SPK“OR EYE CAN TAWK VERRY SLOWLIE” 

75 POKE 39438,60: FOR F=1 TO 200: NEXT 
80 SPK“HAVE PHUNNN YEWZING MEE.BY BY” 

Phonetics! another let down. Half hearted I altered the 
listing to: 

90 REM : 

100 SPK'THANK YOU FOR BUYING BIG MOUTH” 

110 SPK“I AM SURE THAT YOU WILL BE PLEASED WITH 
ME” 

120 SPK“AS YOU CAN HEAR.I AM QUITE,A SMOOTH 
TALKER” 

130 FOR F=1 TO 200: NEXT : POKE 39439,40 
140 SPK“YOU CAN MAKE MY VOICE HIGH” 

145 FOR F=1 TO 200: NEXT : POKE 39439,80 
150 SPK“OR YOU CAN MAKE IT LOW” 

155 POKE 39439,60: POKE 39438,40 

160 SPK'TF YOU WANT I CAN TALK.QUICKLY” 

165 POKE 39438,80 

170 SPK“OR I CAN TALK VERY SLOWLY” 

175 POKE 39438,60: FOR F=1 TO 200: NEXT 
180 SPK“HAVE FUN USING ME, BYE BYE” 

On RUN there was hardly any difference. This thing 
speaks English! As it is rote! But can it speak Aussie 
STRINE? I tried the following: 

199 REM : 

200 SPK“GAD-DAY HOW YA GOING? STRUTH! BUT IT'S HOT' 
AINT IT?” 

Not bad for a foreigner. But I did have to work a little bit 
210 REM : 

220 SPK“GAD-DAY HOW YA GO ING? STROOTH! BUT IT’S 
HOT! AINT IT?” 

The little blighter now sounded as Irish as Paddy’s pjg s 
But it passed with flying colours. 

299 REM : 

300 SPK“9,8,7,6,5,4,3,2,1,BLAST OFF” 

Counts well too! Full stops are called ‘periods’ and 20 is 
“two zero”, 100.5 is “one zero zero period five”. ‘Blast’ 
was a little problem so a minor change was in order. 

310 SPK“9,8,7,6,5,4,3,2,1 .BLARST OFF” 

As you can see from the hardcopy ‘BIG MOUTH’ 
introduces the command (both program and direct) SPK. 
SPK seems to be able to be used exactly the same as a 
PRINT command. There are three POKES you need to 

Continued on page 60 
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Speech Synthesis 

Making Computers Talk 

Human Speech Production: Many of the techniques 
used in adding voice to computers depend on an under¬ 
standing of human speech production so its a good idea 
to start with a brief review of how you and I create speech 
everyday as we communicate with one another. The three 
major parts of the human speech mechanism include the 
lungs, the vocal cords and the vocal cavity. 


Human Speech 

In the human generation of speech sounds, air is forced 
from the lungs past the vocal cords and through the vocal 
cavity. The force of the lungs determines the final ampli¬ 
tude, or loudness of the speech. When the vocal cords 
vibrate, they interrupt the air stream entering the vocal 
cavity and this adds the “buzzing” sound present in most 
speech sounds. For a demonstration of this place your 
hand on your voice box or “adam’s apple” in your throat 
and say the word “voice”, stretching out the vowel sound 
as much as you can. You will be able to feel the vibration 
of the vocal cords. Note that you can easily change the 
vibration rate or pitch of your voice. The vowel sounds of 
English are examples of what is called “voiced” speech. 
But not all speech is “voiced”. You may have noticed that 
in the word “voice”, you didn’t feel any vibrations at the 
end of the word where the “s” sound occured. In this kind 
of sound the vocal cordsdon’t vibrate and they are called 
“voiceless” or “unvoiced” sounds. 

The unvoiced sounds in speech are produced when air 
is forced past relaxed vocal cords. Usually, the actual 
sound of unvoiced speech is generated by forcing air 
through a construction in the vocal tract which produces 
audible turbulence. You can feel the turbulence in the 
front of the mouth by saying a long “s” or“sh” sound. Any 
speech sound can be classified as voiced if the vocal 
cords are vibrating and unvoiced if the vocal cords are not 
vibrating. 

The vocal cavity extends from the lips back to the vocal 
cords. This is the most complicated part of the system 
because depending on the shape of the vocal tract, 
certain frequency components of the speech signal are 
emphasized or attenuated. Musical instruments do the 
same thing and we change the frequencies that are 
emphasized (these are called resonances) by an instru¬ 
ment by moving fingers over different holes in a flute or 
clarinet or by opening and closing different paths in a 
trumpet. We change the resonance of our vocal tract by 
moving our tongue, jaw or by opening and closing a 
connection to the nasal cavity by moving the velum. 


Speech Synthesis with Mathematics: 

The complete mathematical representation of the 
effect of the vocal tract on the breath stream pushed from 
the lungs and past the vocal cords has its basis in the 
physical laws describing the propagation of sound waves 


in a tube of varying crossectional area. The full 
description is quite complex but with suitable simplifying 
assumptions, an approximate solution can be generated. 

The basis for one such solution to the speech modeling 
problem is shown in figure 1. It illustrates a basic two- 
source model used to generate speech. The two different 
excitation signals are fed to a switch that connects one of 
them at a time to the vocal tract model. In this way, the 
system can generate voiced and unvoiced sounds. The 
vocal tract model is a small processor that performs a 
large number of multiplications and additions on the 
input signal to simulate the effect of the vocal tract on real 
excitation signals. The result is a signal that is perceived 
by our ears as being very close to natural speech. 

Figure 1 also shows the parameters that must be 
defined to specify an artifical speech signal. Once a set of 
these parameters is specified, a constant steady state 
sound can be generated. Speech, however, consists of 
rapidly varying sounds and in order to use the model to 
generate speech like sounds, the parameters must be 
rapidly varied. For example, at a voicing transition, the 
position of the voicing switch must be changed. Also, 
since the frequency content of speech signals is 
constantly changing, the parameters defining vocal tract 
shape must be frequently changed. At stops, such as the 
“p” and “d” sounds, the amplitude parameter must be 
quickly changed. 

When the parameters shown in figure 1 are carefully 
determined, the resulting speech signal sounds quite 
natural and is highly intelligible. 


Varying the talking speed 

The parameters listed in figure 1 include amplitude, 
pitch, and several vocal tract parameters. Usually these 
parameters are updated at a 20 millisecond rate, 
although some commercial synthesisers allow the users 
to choose from several update periods. If the same 
parameters are fed to the synthesiser at different rates, 
the speed of the resulting speech is changed. The effect 
is not the same, however, as changing the speed of a tape 
recorder or a phonograph since the pitch of the voice is 
not changed. Instead, the words themselves appear to be 
spoken faster or slower. 



PITCH VOICING AMPLITUDE VOCAL TRACT 

PARAMETER PARAMETER PARAMETER PARAMETERS 


Figure 1 —The basic speech synthesis model showing the control parameter’s 
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BIG MOUTH is the ULTIMATE 

speech synthesis program for the 

Commodore 64. 

Using the command 

SPEAK 

(abbreviated to SPK) 
opens a whole new field of interest 
to the computer USER. 

★ CASSETTE (no additional 
hardware required) 

★ ADDS new command SPEAK 
to BASIC 

★ NO complicated 
mnemonic codes. 

★ Simple and 
fun to use. 




ORDER FORM 

I/We wish to take advantage of the 
COMMODORE MAGAZINE’S special 
offer. BIG MOUTH speech synthesiserfor 
the Commodore 64. It is on cassette and 
the price is $15.95 including packing and 
postage. 


Name. 

□ I enclose cheque for 

□ Please charge my BANKCARD/ VISA MASTERCARD 
Expiry date 


Address 


Signature 



82 Alexander Street. 
Crows Nest. N S W 2065. 
(02)439 1827 


Phone 
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USER GROUPS 



finding a suitable meeting time can be quite difficult. A 
number of groups, Commodore Users Group (ACT) for 
example, meet twice a month at two different venues to 
try to fit in with their member’s other committments. 

Location is fairly important. Suitable venues include:- 
Scout Halls 
Church Halls 
Public Libraries 
Dealer’s Shops 
Schools 

It is not good policy to have a meeting at a members 
home. While a small number may attend the initial 
meeting, the quantity can (we hope will) grow and place a 
burden on the host or hostess. 


User groups are formed for various reasons some 
being quite specialised for instance the study of 
educational software, adventure gaming, specific 
languages (FORTH, PASCAL). In Australia and New 
Zealand most groups are more general in their outlook. 
The exceptions being those built around specific 
computer models i.e. VIC-20 and Commodore 64. 

As a general definition a User Group is a gathering of 
enthusiasts for the dissemination of information. A well 
organised group can offer such facilities as a software 
library, bulk buying discounts, periodical newsletters, 
group sponsored tutorials, de-bugging evenings and 
special interest groups. 

On page 28 of this issue is a list of known Commodore 
User Groups. Some have contacted us with information 
on their activities, meeting dates and office bearers. 

How do you go about forming a user group if you are not 
fortunate enough to be within the area of an existing 
group? 

FIND INTERESTED PEOPLE 

After ascertaining that there 
definitely is no other user group 
within your area make use of the 
bulletin boards that are readily 
available through supermarkets, 
churches, schools, Commodore 
dealers, Public libraries, video 
shops etc. asking other interested 
people to contact you. Figure 1 
is a sample 3x5 card that you 
may wish to complete and 
photostat for this purpose. 

FIRST GET-TO-GETHER 


Call an informal meeting of 
those people who have exp¬ 
ressed interest. At this meeting 
define the exact purpose of the 
group. Determine suitable meet¬ 
ing time and date. Because of 
other committments of members, 


The local school can be a very good venue especially if 
it uses Commodore computers. Here the user group can 
offer something to the community by working hand in 
hand with the teachers on various computer projects. The 
teachers expertise can also be utilized to develop the 
groups tutorial program. By using a school you are 
utilizing a public facility, however, not all areas permit the 
use of schools in this fashion, but it is worth a try. Very few 
user groups do not have an abundance of enthusiastic 
teachers. 

LET PEOPLE KNOW YOU EXIST 


At this stage you can consider yourself an established 
user group and should notify Commodore Business 
Machines Pty Ltd, 5 Orion Road, Lane Cove, 2066 and 
THE COMMODORE MAGAZINE so that they can 
publicize the fact 

It would also be worthwhile contacting some of the 
other user groups for assistance i.e. newsletters, record 
of activities, software library support and general advice. 
With very few exceptions the Commodore User Group 
Network is very friendly and anxious to help new groups 
get started. 



COMMODORE COMPUTER USERS 
ARE' YOU [INTERESTED IN FORM ING 
A LOCAL USER GROUP? 


Users and other interested parties please contact: 
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MEMBERSHIP 


The most likely source of membership are schools, 
colleges, TAFE’s and local businesses- especially in the 
high-tech and engineering area. But your prime source of 
membership will be through your local dealer. A good 
working relationship with the local dealer will pay 
divedends for both of you. 

Piracy of software, an accusation made by many 
dealers about user groups, will be the thing that kills any 
chance of a working relationship. No matter how you 
justify or moralise piracy it is illegal. You would not want 
someone to take your bread and butter so why take 
theirs. It was not so long ago that many software 
packages gave you permission to make backup copies- 
this priviledge has been so abused that it is very seldom 
offered now to the inconvenience and cost of the end 
user. 


Don't forget the mail-order companies, many of them 
publish Newsletters and will give you publicity if you tell 
them of your group. 


Computer Technique 


The Total! Computer Package 

COMPUTER BOOKS 

A Complete range, including many hard-to-get 
titles, at competitive prices with student and other 
discounts available. 

SKC DISKETTES 

Great Prices on the 100% certified error free, lifetime 
guaranteed precision floppy - available in 
Queensland through Computer Technique. 

SMITH CORONA 

Printers all through the range. 

ASSORTED ACCESSORIES 

Including Modems; Disk Cases; Computer Stationery; 
Portable Computers and accessories. 

Level 2, 52 High Street Toowomg 
Telephone (07) 371 9714 
Hours: 10am to ©pm - 5 days 


Typical Townsville User Group programme 

NEXT MEETING 

The next meeting will be held in the computer room of 
Ignatius Park College at 7.30pm on Wednesday 7 
November. 

1. Wes Koeman will demonstrate a programme he has to 
test disk head alignment. 

2. Keith Kikkert will give the machine language lecture, in 
which he will demonstrate how to use an assembler to 
write programs in machine language. 

3. Trevor Davies will demonstrate Flight Simulator II. _ 

Drop a line to your local radio station and newspaper. 
Don’t expect the editor to write the article for you - you 
write it. A hint from a hack is to make your three closing 
paragraphs so that they can be cut out without altering 
the meaning of the article. When the artist lays up your 
article he/she will cut from the bottom without reading it. 
A good quality photograph will generally get printed 
especially if it is topical or has interest e.g. Local dealer 
handing over some small item to assist the group. The 
local minister of religion (who’s church hall you meet in) 
looking ’in wonderment’ at a monitor screen etc. 

Computer demonstrations can also generate interest 
in the group. Our local Scout Group held a ‘father & son’ 
evening with five Commodore demonstrated games, 
speadsheets, music etc. The evening was so successful 
that the only way to get people to go home was to pull the 
plug. The local dealer was fairly happy too, for as a direct 
result at least five C64s were sold. 


GENERAL MEETINGS 

By now you should have started a round of general 
meetings to write a constitution. Elect office bearers. 
Determine membership fees and policies. Like any 
organisation a User Group needs to have some structure 
to know what it is doing. Plans need to be made for 
activities, the development of a newsheet; a software 
library etc. 

The ACT Users Group has given us permission to print 
their constitution as an example that you may wish to 
work from. 


OTHER TIP-BITS 


Insurance: The group may be able to arrange special 
computer insurance deals. 

Discounts: Bulk purchase of disks, paper etc. can be 
made by the group at a saving that is partially passed on 
to its members and also assist its kitty. The 
COMMODORE MAGAZINE has a special User Group 
Subscription for User Groups which could save the group 
up to 30% off subscription rate. Your local dealer may 
offer members a special user group discount for items 
bought from his store. 


Continued on page 60 
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True Confessions of a 

User Group Newsletter 


Byting the Bullet Without Really Trying 


Editor 


By Walt Lounsbery - Wichita Commodore User Group 

A newsletter can be the glue that holds a user group 
together. Here’s how to keep the newsletter’s editor 
from coming unglued. 

Every now and then, since assuming the duty of editor 
for the Commodore Users Group of Wichita’s newsletter, I 
have reflected on the role that the newsletter plays in our 
club. I think about it late at night, usually, when the 
newsletter is not coming together on schedule, and a few 
more hours of work could make all the difference. 

It seems obvious that the members can and will trade 
programs and ideas on their own, regardless of the club. 
(For example, how many fellow Commodore owners do 
you know at work or in your neighborhood? Are many of 
them in a club?) And despite all the effort of those trying to 
save money by buying things in quantity, they often end 
up getting much better service and value through the 
local dealers or even by regular mail order. Like most 
organizations, only one-fourth of the members really 
make it to the meetings, and the ones that want to attend 
a workshop always seem to miss it. 

As a result, it seems as if the newsletter is the glue that 
binds the whole organization together. It is where the 
members really find out what is going on. The newsletter 
provides entertainment, and communication. Certainly it 
is worth that extra ounce of effort to produce a newsletter 
that hundreds of people have been impatiently waiting 
for? 

Nowadays,I ponder all these things for a few seconds, 
roll over and fall into a deep and restful slumber. 


NEWSLETTER PHOBIA 


Having made my cruel point, perhaps it would be best to 
state it another way before my club ranges a lynching 
party! (These are quite popular in Kansas, even more than 
Tupperware parties.) 

Although a newsletter can be an essential part of any 
club’s activities, there is an almost universal fear of 
writing and publishing something so simple. The job is 
seemingly so awesome that many clubs don’t have 
newsletters, although they would dearly like to put out 
one. I have seen people that worked on high school 
newspapers cringe at the very idea of writing for the club 
newsletter, much less trying to produce one. But sadly, 
the lack of a newsletter often means the death of a 
fledgling club. This is hard for me to understand because 
a computer club should be fun and working on computer 
club projects should be even more fun and rewarding. It is 
a matter of attitude, of philosophy, if you will. Every 


computer club officer should keep in mind Lynd’s Law: 
Life is worth living, but only if we avoid the amusements of 
grownup people. 

YOU MUST PUT IN WHAT YOU PUT OUT 


Perhaps the best way to start a newsletter for a 
computer club is simply to start one. Make it asinglepage 
to begin with. Add pages as people start to contribute and 
before long there will be plenty of food for thought in 
every issue. Keep in mind that every club is unique and 
the newsletter should reflect the nature of the club, not of 
its editor. This is how the best newsletters start and grow. 

But if the editor does not shape the newsletter, what the 
heck does the editor do? What we have here is a chicken- 
or-the-egg situation. The newsletter obviously does not 
assemble itself out of everyone’s ideas. The editor must 
decide how to put the articles together, what news might 
be worth including in an issue and how to get the 
newsletter to the members. In the beginning, the 
dedicated editor may even have to write most of the 
articles. 

I am going to offer some suggestions that should help 
in publishing a newsletter. It is possible to put out an 
interesting gazette without a lot of effort. On the other 
hand, the most difficult part is really what to put into those 
issues from all the material at your disposal. 


A Newsletter Is Like A Salad: 


All Tossed Together At The Last Minute! 

Even though starting a newsletter can be nerve 
wracking, the first issue can be incredibly easy to 
assemble. It should have the bare minimum club news, 
such as the meeting schedule, a map of the meeting 
location, minutes of the previous meeting and the names 
of the club officers and how they may be contacted. Now 
that the contents of the first page are determined, the 
second page should include any pleas for newsletter 
articles and participation in future club activities. This will 
take about one sheet of paper if printed on both sides of 
the sheet. There should only be one more sheet of paper 
as a cover sheet, with a return address printed at the 
appropriate spot. The third and last sheet is the most 
important for you, it should be a stamped, self-addressed 
questionnaire forthe club members. Although this costs a 
bit of money, it is well worth finding out what kinds of 
computers the members have and what their interests 
are. With this information in hand, it is possible to 
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determine the best content for the following newsletters. 


The Great Paper Chase 


OK, so once you have achieved one issue’s respite with 
the old membership questionnaire trick, what do you do 
now? It is necessary to start on the next issue just as the 
last goes out, and editing that next newsletter really 
should’nt be a chore. After the first issue, you, the editor, 
must use all the cunning at your disposal. You have to 
remember Peter’s Proposal: Anything worth doing is 
worth getting someone else to do. 

Peter’s Proposal operates in this manner. Every club 
should have several officers, each of whom may have 
something to say in each and every issue of the 
newsletter. The president is always wanting more help 
with meeting programs, tutorials and workshops. The 
secretary has to publish the minutes. The librarians are 
always pleading for more programs. The membership 
chairperson has to flaunt a long list of the people that 
joined the club last month. The treasurer is obligated to 
point out that the club is losing money. In fact, as editor 
you may have difficulty getting them to shut up! 

There is also the small matter of the club membership 
and that survey you sent out. Even though the officers 
were elected by the majority of the club, they are just a 
small minority taking up lots of expensive paper in a 
newsletter. An editor must try to defy the precepts of 
Kitman’s Law: Pure drivel tends to drive ordinary drivel off 
the TV screen. 

Until the members get over an initial reluctance to write 
for the newsletter, it is usually necessary to provide good 
examples. This also helps prove to the other officers that 
they aren’t writing all the newsletter! Before I discuss 
sources of material, consider Table 1, a typical list of 
items in a newsletter. Certainly there is no minimum 
number of these in a good newsletter, just as there are 
many more possibilities not listed here. 


Table 1 

Computer Club Newsletter Items 

Club officer Names and Telephone Numbers 

Table of Contents 

Club Officer's Messages: 

President's Page 
Librarian's Letter 
New Members 
Treasurer's Report 
Minutes of the Last Meeting 
Meeting Schedule 
Meeting Map 
Program Library Access 
News and Rumours 
New Products 
Club Classified 
Product Reviews 
How To Do It (Tutorial) 

Program of the Month 
Hardware Construction 
Modem Talk 
Cartoons 


I have always believed that a club newsletter should 
consist of articles written by the members. Sometimes, 
though, all those articles that were supposed to arrive 
before the deadline, don’t. Every now and then a new 
development just has to be in the next newsletter. The 
first few issues, of course, should contain some articles of 
interest until the local articles are written. Where does 
this material come from? 



One of the best places to start looking for newsletter 
material is the magazine you are reading right now. Try 
contacting some of the other user groups around the 
country, listed elsewhere, and you can get examples of 
some of the best newsletters. Generally, it is good 
manners to return the favor and place those clubs on your 
mailing list. Besides providing articles and gossip, they 
will show many creative formats for a club newsletter. 
Computer bulletin boards and teletext services also 
provide a good source for up-to-date material. The 
magazine itself, of course, will have some of the latest 
news that may bear repeating. If you are industrious, it is 
worthwhile to scan several magazines and trade journals 
for that interesting tidbit. I regularly look at about thirty 
publications a month, which is just a fraction of what is 
available. 

Don’t forget to send Kim Books and Commodore your 
club’s name and address! This will be published in our 
Magazine, showing everyone that a new active user 
group has been formed. Several third party manufact¬ 
urers mail to this list, so your club will also eventually be 
sent a lot of new product announcement literature. 

One of the astounding things about editing a computer 
club newsletter is how easy it is to get review material. 
New programs and hardware are being produced so fast 
that many dealers cannot possibly keep up. Most dealers 
will appreciate the opportunity to work with the local user 
group and to hear exactly what their customers think of a 
product, so it should be fairly easy to borrow evaluation 
samples. Make sure to give proper credit to the dealers in 
your newsletter; this is one way they are supporting your 
club. And, naturally, some care is required in recruiting 
people to do the reviews! 
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The Nitty Gritty Newsletter Band 

Once the sources of material have been located and 
tapped, the newsletter editor must face up to the really 
difficult decisions. It is necessary to collect the articles, 
lay out the newsletter format, perhaps make up a mailing 
list, get the newsletter printed and send it out. After the 
first few issues it is easy to see that the writing and article 
solicitation is the fun part; getting the issues out can 
easily become a chore. But it is possible to nearly 
eliminate that tedium and still produce something your 
club can be proud of. 


Format, Printing and All That Jazz 

When it comes time to put together a publication and 
send it out, no matter what it is, there is one thing that 
should be foremost in the editor’s mind. MONEY!!! Yes, it 
sounds petty, even cheap. Certainly the editor should be 
concerned about quality, good layout and content. But 
thinkaboutthis:thenewslettercanbethesinglegreatest 
expense for a club. Finding some way to save a penny 
here or there means both lower dues and more funds to 
purchase needed equipment and supplies or maintain a 
club computerized bulletin board. In the case of our user 
group, the dues are set entirely on the cost of producing a 
newsletter, estimated at US$1.25 per member per issue, 
or US$15 per year if we can produce 12 issues. Of course 
the actual cost can vary a lot, as we shall see. 

There are several ways a newslettercan be laid out. The 
simplest format is very easy. Simply set the margins to 
23.5mm (%”) that is 7 characters at 10 cpi, on the left and 
12.5mm (V 2 ”) on the right (5 characters), and provide 
enough margin at top and bottom to allow for 
misalignment during the copy process (12.5mm). A 
standard A4 sheet (297mm x 21 Omm) should be used. To 
make the process easier, the items should be typed or 
printed out separately, and then pasted up on the final 
sheet. ‘Paste’ is a generic term. The articles can be 
attached to the final page with ‘magic’ transparent tape, 
rubber cement, special layout gluesticks or wax, if you 
have access to a waxing machine. (Those of you with 
access to professional typesetting services that provide 
camera-ready copy on an adhesive backing may not need 
the advice in this article anyway!). Adhesive backed 
typesetting is very rare in Australia but most typesetters 
can wax your typesetting which is almost the same thing. 

The easiest method for an editor is wax, which the 
printer despises. Rubber cement is unhealthy and your 
thinking tends to get distorted just when you need it most. 
Tape is a one time operation that requires a sharp knife if 
you make a mistake. It is best to try all the methods to find 
what you can get along with. After paste-up,it is essential 
to apply page numbers for easy reference during printing 
and collation. 

Now isn’t that simple? Not if you are a penny-pincher! 
First, it is wasteful of paper. Second, if you are concerned 
with providing copy that is easy to read, the long line 
lengths just won’t do. The first improvement is to print on 


both sides of the paper. This requires laying out pages so 
that one edge can be punched for notebooks (the wide 
margin). Half the layout pages will have the wide margin 
on the left side, the rest will have it on the right side. Since 
the printer will copy both sides, you should use a separate 
layout sheet for each page in case of mistakes. Carrying 
things to great extremes, it is possible to use a size- 
reduction step before the final copy. This allows putting 
four pages of full-sized printing on a single sheet of A4 
(297mm x 21 Omm) paper, with the lines aligned along the 
length of the paper and two printed pages side-by-side. 
However, this process requires at least letter-quality 
printing with a good quality copying process. It also 
makes your job a lot more difficult, since pages and 
sheets of paper no longer coincide. Numbering the pages 
isn’t easy, and the printer will really get a headache 
collating and stapling the thing. However, this is exactly 
how many magazines are assembled. With the reduction 
step, it is possible to actually put the equivalent of five 
pages on a single sheet of paper, since the layout page 
can be thirteen inches (330mm) long. 

Photo-reduction is great if paper is expensive, or you 
send all your newsletters airmail, but what if your main 
concern is legible issues? In our group, we found that far 
too many people simply couldn’t see that kind of print. (I 
won’t say that this had anything to do with age. They might 
club me to death with their canes.) Also, program listings 
cannot be reduced well at all. 

If you are mainly concerned with legible copy, line 
length must be dealt with. The reason that newspapers 
are printed in narrow little columns is that narrow 
columns make it easier to read that tiny print and it is 
easier to lay out the pages. We can take the same 
principles to heart and put multiple columns on a page.lf 
the standard page size is used, two columns are practical. 
If the page is laid out sideways or on larger paper, then 
three columns may be used. In any case, make sure about 
three-eighths inch (approx 7mm) separates the columns. 
One drawback to columns is the use of right-justification 
with word processors. Unless you use a word processor 
with a very sophisticated word-split capability, the 
columns will end up with large gaps as the word 
processor tries to align the words. 

Before we move on I should mention printing costs. 
This varies a lot from area to area. Some clubs even have 
sponsors willing to donate printing. If you must go to a 
printer, be sure and send out a request for bids to several 
printers to obtain the best rate. The request should tell 
how many issues you will be printing, how many pages 
per issue, what type of printing process and if you 
anticipate much growth in circulation. Don’t forget any 
stapling or collating requirements. 


Old Artists Never Die, They Just Paint 
Themselves Into A Corner! 


Of course, this is a fate that an editor avoids each and 
every issue. A good part of this is because the editor 
adapts the artist’s tools for the sake of good text 
presentation, entertainment, but above all, to get rid of 
those unsightly gaps between the articles. Sometimes 
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the filler material can overwhelm a newsletter, but it is 
essential for a pleasing appearance. I cannot really do 
justice here to all the many ways to apply graphics to 
newsletters. Instead, I suggest looking at magazines and 
other newsletters to get some ideas. ^ 


A1CC4NORAM 


Probably the best source for graphic material is the 
transfer sheets available in office supply stores. These 
dry transfer sheets have interesting letter styles for titles, 
short items and page numbers. Some have oddball items 
like mathematical symbols, pointing hands or border 
graphics. If you have a hard time drawing uniform lines 
where needed and you don’t feel like purchasing an 
expensive drafting pen set, adhesive pin striping may be 
applied. If your newsletter circulation is sizable, it is 
possible to purchase computer cartoons for use. Many 
cartoonists will send sample material out to clubs listed 
this in magazine. (Unfortunately in Aussie many of the 
lesser cartoonists charge by their ego and not by their 
skill. They are also reluctant to send samples unless you 
are a known publisher or recognised agency- but give it a 
try.) 


Roundup At The OK Post Office 

Everyone knows how to mail things, but how many mail 
bulk? Among the many ways an editor can save money, 
the main consideration is always postage costs. Say your 
issue is firming out to sixteen pages or eight sheets of 
paper copied both sides. You can Pre-Sort and Bulk mail 
these if you are posting more than 1000,(very generous!!) 
or you can apply for a Category B classification, which will 
cost: 

* Application for category B Registration - $30 p.a. 

0 ^ e r>ewal of category B Registration - $30 p.a. 

If your newsletter is up to 50gms Post should cost 18 - 
19c/unit. 


For example The Commodore Magazine weighs 
190gms. This falls into Catagory B (100-250gms), costing 
23 cents to mail anywhere in Australia. These charges 
apply only to pre-sorted articles. We advise you to ask at 
your local post office for further information. Pre-sorting 
is really no chore if your mailing list is computerized, and 
we know there is no excuse for that, right? 


Any Sufficiently Advanced Technology Is 
Indistinguishable From Magic 

Oh yes, all of this article collecting, editing, printing and 
mailing is supposed to be easy. Almost like magic (ahem!). 
A computer club can turn on the magic like no other, for 
computers are the name of the game. With a reasonable 
collection of word processors at your disposal, it is easy 
for a member to write an article to go directly into your 
newsletter format. Spelling checkers and utilities can 
help find errors and perform the newsletter layout. Items 
can go directly from a computerized bulletin board into 
the next issue. Mailing list programs can help keep a 
current list of members and subscribers, sorting and 
printing mail labels and reports. 

As I mentioned before, there is only one tough job a 
newsletter editor has: deciding the organization of an 
issue. Sometimes the content must also be judged. There 
will be some demand for commercial advertising, so rates 
will have to be set (I recommend adding 30% to your cost 
of publishing a newsletter in six months. This prevents 
subsidizing the ads). How many reviews are too many? Is 
quantity better than quality? Should each issue have a 
program listing or two? Whose article gets put on page 
one? Should circulation be promoted, even if it means 
stepping on the membership chairperson’s toes? 

In this case, there is one good lesson we can learn from 
video games. It’s not fun unless it is a challenge. Editing a 
newsletter is fun. It’s a service to the club and the 
computer community. It raises the low and entertains the 
mighty. Progress marches on. Newsletters instill 
confidence and good manners. Above all, like this article 
right here, they totally conform to Feuchtwanger’s Law: 
There's only one step from the sublime to the ridiculous, 
but there's no road leading back from the ridiculous to the 
sublime. AMEN. 

from POWER/PLAY Aug/Sept 1984 



- Australianized by Denise Elkins 
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COMPUTERTIME- 



- have time for you! 





Incredible Musical Keyboard 

Kawasaki Synthesiser (D) 
Kawasaki Rhythmrocker(D) 
Music Processor (D) 

Computer Song Albums (D) 


ALSO AVAILABLE 


$69.95 

$69.95 |T) $64.95 
$64.95 (T) $59.95 
$54.95 (T) $49.95 
$39.95 (T) $34.95 


commodore 


$475 


RRP 

S80.00 
S40.00 
S100.00 
SI 00.00 
S19.95 
$24.95 
S200.00 
$ 100.00 
$150.00 
$80.00 
$60.00 
$149.50 


Prices include Sales Tax 

Simons Basic |C) 

Introd. to Basic 1,2 (D/TJ 
Easy Script (D) 

Manager |DJ 
Typing Tutor |T) 

Typing Tutor (DJ 
Calc Result Advanced (DJ 

Calc Result Easy (CJ 
Multiplan (D) 

CPM|C/D) 

Assembler (D| 

Koala Pad(D) 

MERIDIAN BUSINESS PACKS 

Debtors (D) 

Creditors (DJ 
Stock Control (D) 

Invoice/Sales Analysis |DJ 

General Ledger (D) 

entertainment software 

Flight Simulator(D) 

International Soccer (C) 

China Miner |T) 

China Miner |D) 

Thermonuclear War Games (T) 

Thermonuclear War Games (D) 

Ski Devil (T) 

Vortex Raider (T) 

Vortex Raider |D) 

Zone 6 (T) 

Zone 6(D) 

Secret of Barstow Manor |TJ 
Secret of Barstow Manor (D) 

Metro Blitz |T) 

Metro Blitz (D) 

Crosswords (D) 

Crosswords(T) 

The Hobbit |C) 

Guide to playing the Hobbit 
Blagger(T) 

Blagger(D) 

All items in stock at time of print 

Manufacturer's FULL WARRANTY on ALL Products 


Computertime 
$75.95 
$37.50 
$93.50 
$93.50 
$18.50 
$23.50 
$189.00 
$93.50 
$142.00 
$75.00 
$55.00 
$142.50 


FOR THE C64 

$ 100.00 

$ 100.00 

$ 100.00 

$ 100.00 

$ 100.00 


$79.95 

$30.00 

$24.95 

$29.95 

$19.95 

$24.95 

S19.95 

$24.95 

$29.95 

$19.95 

$29.95 

$19.95 

$24.95 

$29.95 

$34.95 

$24.95 

$19.95 

$39.95 

$19.95 

$24.95 


$95.00 

$95.00 

$95.00 

$95.00 

$95.00 


$77.95 

$28.00 

$23.50 

$28.50 

$18.50 

$23.50 

$18.50 

$23.50 

$28.50 

$18.50 

$28.50 

$18.50 

$23.50 

$28.50 

$33.50 

$23.50 

$18.50 

$37.95 

$9.95 

$18.50 

$23.50 


ENTERTAINMENT SOFWARE 

SonofBlagger(T) 

SonofBlagger(D) 

Loco(T) 

Loco(D) 

Miner 2049 er (C) 

Cuddly Cuburt(T) 

Cuddly Cuburt(D) 

Mummy's Tomb (TJ 
Space Mayhem |T) 

Neodyps64(T) 

Climber (TJ 
Star Post (CJ 
Kickman(C) 

Stella Wars (T) 

Labrinth(T) 

Sooper Fruit |T) 

Depth Charge (T) 

Super Grider (T) 

Stock Market (T) 

Data Form(D) 

Data Form (T) 

Beach-Head (G) 

Beach-Head (D) 

Pit Stop (C) 

PogoJoe(D) 

PogoJoe(T) 

Strip Poker (D) 

Choplifter (CJ 
Loderunner(C) 

Cops & Robbers (TJ 
Dragonsden(C) 

Gridrunner(T) 

Grand Master (T) 

Grand Master (D) 

ADVENTURE GAMES 

Lords of time (T) 

Colossal Adventures (T) 

Dungeon Adventures (T) 

Snowball (T) 

Ultima 11(D) 

Ziggurat(D) 

E. &0. E. (C) = CARTRIDGE (D) =DISK (T) =TAPE 
Prices subject to change without notice. 


Commodore 

1701 

Monitor's 


Commodore 

1541 

Disk Drive's 


Commodore 

801 

Printer's 


Commodore 

802 

Printer's 


Commodore 

1101 

Printer's 


Epson 


RX80 

Printer's 


Epson 


RX80F/T. 

Printer's 




ADVENTURE GAMES 



$19.95 

$18.50 

Dunzhin(T) 

$35.00 

$33.50 

S24.95 

$23.50 

Kaiv(T) 

$35.00 

$33.50 

$19.95 

$18.50 

TheWylde 

$35.95 

$34.50 

$24.95 

$23.50 

The Institute (DJ 

$39.95 

$37.95 

$59.95 

$57.95 

Zorkl(D) 

S25.00 

$23.50 

$24.95 

$23.50 

Zork 11(D) 

$25.00 

$23.50 

$29.95 

$28.50 

Zork 11(D) 

$25.00 

$23.50 

$29.95 

$28.50 

Reach for the stars (D) 

$39.95 

$37.95 

$19.95 

$29.95 

$18.50 

$28.50 

ENTERTAINMENT 

Retail Computertime 


$19.95 

$30.00 

$30.00 

$ 12.00 

$ 12.00 

$ 12.00 

$ 12.00 

$24.95 

$25.95 

$24.95 

$19.95 

$29.95 

$39.95 

$39.95 

$34.95 

$29.95 

$39.95 

$54.95 

$39.95 

$24.95 

$30.00 

S21.95 

$24.95 

$34.95 


$25.00 

$25.00 

$25.00 

$25.00 

S44.95 

$39.95 


$18.50 

$27.95 

$27.50 

$10.50 

$10.50 

$10.50 

$10.50 

$22.95 

$28.50 

$23.50 

$18.50 

$28.50 

$38.50 

$38.50 

$33.00 

$28.50 

$37.95 

$52.50 

$37.95 

$23.50 

$28.50 

$20.75 

$23.50 

$33.50 


$23.50 

$23.50 

$23.50 

$23.50 

$42.95 

$37.95 


Retro Ball (C) $56.95 

Slinky(D) $25.95 

Cave Kooks (T| $16.95 

Crush, Crumble and Chomp (T) S45.95 

O'Riley s mine (D/T) $59.95 

Snokie(C) $59.95 

Jawbreaker 11 (DJ $41.95 

Laserzone(T) $22.95 

Summer Games (DJ S29.95 

Brands (TJ S19.95 

Eagle Empire (T) $19.95 

Gridtrap(T) 319.95 

JumpinJack(T) $19.95 

Triad (TJ SI9.95 

Turmoil (D) $49.95 

RootinTootin(C) $49.95 

Squish'em(D) $48.95 

Curse of RA(D) $29.95 

The Factory (DJ $54.95 

Fast Eddie (D) $48.95 

Bat Attack (TJ $19.95 

Super Dogfight (T) $19.95 

Snooper Troops (D) $54.95 

Snake Byte (DJ S50.95 

CosmicTunnels(D) S49.95 

Tralns(D) $49.95 

Aerobics (D) S49.95 

Sea Fox (C) 348.95 

DinoEggs(D) 354.95 

The Blade of Blackpoole(D) $59.95 

Perplexian Challenger (DJ $44.50 

Tech Sketch Light Pen $89.95 

Light Pen $79.95 


$55.50 

$24.50 

$15.95 

$44.50 

$58.25 

$58.25 

$40.00 

$21.95 

$28.50 

$18.95 

$18.95 

$18.95 

$18.95 

$18.95 

$48.50 

$48.50 

$47.50 

$28.50 

$53.50 

$47.50 

$18.95 

$18.95 

$53.50 

$49.50 

$48.50 

$48.50 

$48.50 

$47.50 

$53.50 

$58.25 

$43.00 


f: commodore 

COMPUTER 

Keeping up with you 


Shipping & handling charges: Sydney - S5.00; anywhere else In Australia - $ 10.00 

Call at COMPUTERTIME, 345 VICTORIA AVENUE, CHATSWOOD N.S.W. 2067 
or phone |02) 411 5277 or (02) 411 5757 for immediate attention 

All Major Credit Cards Accepted - Write, phone or call for our SOFTWARE AND BOOK CATALOGUE 


COMPUTERTIME: FOR TOP VALUE 
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Continued on page 58 


USER GROUPS 


The Who, where and what of user groups. 


User Groups who have 
made contact 

NSW ACT 

Name: 486 SQN Commodore User Group 

Secretary: R.J. Nichols 

Address: 486 SQN Elec Sect, RAAF Base, 

Richmond, NSW, 2755 

Meetings: Whenever Possible, 486 SQN 

Description: To assist each other with 

operation of computers. 

Name: The ACT VIC-20 Users Association 
President: Chris Groenhout 
Address: 25 Kerferd St, Watson, ACT, 2602 
Meetings: First Monday of the Month, 
7.30pm-10pm, Boy’s Grammar Scout Hall 
Description: We do not have members as 
such but run a magazine to which people 
subscribe and are thought of as members. 
The association also runs a software 
library of over 530 programmes. 

Name: Commodore User Group (A.C.T.) 
Secretary: Peter Thompson 
Address: P.O. Box 599, Belconnen, ACT, 

2616 

Meetings: Fortnightly 

Description: Very active group that produces 
an informative newsletter and a compre¬ 
hensive software library. This group has 
actively assisted several groups in their 
formative stages. 

Name: Southern Districts Commodore Users 
Group 

Secretary: Lex Toms 

Address: 3 Lucille Cr., Casula, NSW, 2170 

Meetings: Not Advised 

Description: Very active and growing group. 

It encourages country members and pro¬ 
duces an informative newsletter (50c). Has 
a software library. 

Name: Wollongong C64 Users Group 

Secretary: Peter Stanhope 

Address: 155 Jacaranda Ave, Figtree, NSW, 

2525 

Meetings: Monthly 

Descriptions: Two groups (beginners and 
advanced), each of which meets once a 
month. Magazine, disk and tape libraries. 
Members have access to over 100 different 
tape programmes. Classes for beginners, 
and for the more experienced. 

VIC 

Name: Geelong Commodore Computer Club 
Secretary: D. Gerrard 

Address: c/- 15 Jacaranda Place, Belmont, 
VIC. 3216 

Meetings: Not Advised 
Description: New Group 

Name: Commodore 64 User Group 
Editor: F.A. Martin 

Address: 46 Studley St, Abbotsford, VIC, 
3067 

Meetings: Not Advised 
Description: A very professionally produced 
newsletter. Software library. It seems to be 
a combination of a number of groups ie. 
PRAHAN GROUP, DONCASTER CENTRAL 
GROUP etc. 

QLD 

Name: Southport Commodore Computer 
User Group 
Treasurer: J. Smith 

Address: P.0. Box 790, Southport, QLD 
4215 

Meetings: Labrador State School, Mondays 
7pm-10pm 

Description: Further knowledge of comput¬ 
ing. Software library and computer 
newsletter. 


Name: Cairns Commodore Users Group 
Secretary: Walter Kindt 
Address: 42 Langan St, Cairns, QLD, 4870 
Meetings: Tuesday each fortnight. Cairns 
Education Centre 

Description: Programming and Games. Has 
newsletter. 

Name: Saint La Salle PC Users Group 
Secretary: M. Tyler 

Address: De La Salle Library, Scarborough 
Rd, Scarborough, QLD, 4020 
Meetings: After School in Library, Mon & 

Fri 

Description: Not Advised 

Name: Commodore Computer User Group 
(Townsville) 

Secretary: Tony Moore 

Address: 1 Paxton St, Townsville, QLD, 

4810 

Meetings: Computer Room, St Ignatius Park 
College, 7.30pm, 1st Wednesday of the 
Month 


Description: Very active group with software 
library and newsletter. Strong contacts 
with other groups. 

WA 

Name: VICHIPS Computer User Group 
Secretary: Ron Teague 
Address: 48 Hercules St, Rockingham Park, 
WA, 6168 

Meetings: Rockingham High School, Mon - 
7.30pm 

Description: We differ from most user 
groups as we have taken as part of our 
charter to establish a wide and active 
community base and have worked to 
ensure that Commodore Computers are 
introduced into the schools in our area, 
with the commitment to those schools that 
we would support them in every way, I am 
happy to say that we have had a great 
deal of success. 


NEW ZEALAND 


Name: Christchurch Commodore Users Group 
Secretary: John Kramer 
Address: P.O. Box 15-024, Christchurch, 
8000, New Zealand 

Meetings: 4th Monday 7.30pm Chefs Hall, 
Bedford Row 

Description: We are one of the largest 
groups in NZ with members spread right 
throughout the country and a few overseas 
At present we are in the process of getting 
enough members with modems to warrant 
the setting up of a bulletin board. 

Name: Nelson Commodore Users Group 
Secretary: Steph Cocker 
Address: P.O. Box 860, Nelson, New 
Zealand 

Meetings: Stoke School, 7.30pm, third 
Thursday 

Description: Group lists its interest as edu¬ 
cation and general computing 


COMMETTE 64 


Supercharge your datasette 
with Commette 64. 

This revolutionary cassette 
gives you the power to save 
and re-load your programs 
faster than disk. 

Once your program is 
Supercharged it will re-load 
at high speed without 
re-using Commette 64. 

No more delays! No more 
waiting! - PLUS tape space 
reduced to a minimum. 

Buy this time saving program 
and you can do more with 
your time. 

For Commodore 64 
send cheque or money order to: 

© By SEMI-SOFT 
From: 

P.D. Software Flouse, 

P.O. Box 451 
Spit Junction 2088 
Phone (02) 922 4893 ^ 

Dealers enquiries welcome 

msnA 
\ 




COMMETTE 64 H 

MAKES YOUR 


DATASETTE 
TAKE 
OFF! 
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Sample Constitution 

We‘d like to thank the COMMODORE USER GROUP (ACT) for their permission to print this draft constituion as a sample for other groups. 


THIRD DRAFT THE CONSTITUTION OF 
COMMODORE USER GROUP (ACT) 


1 • The name of the group shall be: COMMODORE USER GROUP (ACT) 

2. In this constitution unless inconsistent with the context or subject matter, 
wherever expressed the singular includes the plural and vice versa and words 
importing gender include both male and female. 

“annual meeting” means the annual general meeting. 

“member” means a fully paid subscriber. 

“month” means calendar month. 

“group” means COMMODORE USER GROUP (ACT). 

“the commitee” means the duly elected committee for the time being, until 
the next annual general meeting. 

“quorom” means; for the committee - 7 committee members, for general 
meetings - 20% of members, or a minimum of 25. 

3. AIMS. 

i. exchange of ideas and information amongst members, 

ii. assisting nw computer owners in getting started, and 

iii. promoting the use of personal computers for educational and recreat¬ 
ional use. 

4. MEMBERSHIP. 

i. The group shall consist of: 

a. Ordinary members, 

b. Life members, 

c. Honorary members. 

ii. Membership shall be open to all persons upon application on the 
prescribed form, and upon payment of a subscription 

iii. Acceptance of an application for membership may be reserved if it is 
considered by a quorom of the committee that acceptance may be 
contrary to the best interests of the group. Acceptance of the application 
is to be referred to the members of the group for decision at a general 
meeting. 

5 . ORDINARY MEMBERSHIP. 

Payment of subscription entitles the person nominated on the application 
form and members of his immediate family to all rights and privileges of 
membership. The nominated person only receives voting rights. 

6. LIFE MEMBERSHIP 

i. On the recommendation of the committee, and with the consent of a two 
thirds majority of the members present at the annual meeting, a person 
may be granted Life Membership with all the rights and privileges of 
membership without payment of annual subscription; 

ii. Grounds for the award of Life Membership shall include: 

a. exceptional service to the group, 

b. seven (7) years service on the committee. 

HONORARY MEMBERSHIP. 

On the recommendation of the committee, and with the consent of a two 
thirds majority of the members present at the annual meeting, a person, 
company, or group may be granted Honorary Membership. Honorary 
Members shall be entitled to all rights and privileges of membership except 
that they shall not be entitled to vote at meetings and shall not be eligible for 
election to the committee. 

8 . SUBSCRIPTIONS. 

The amount of the annual subscription is to be determined at the first annual 
meeting and may be reviewed at a general meeting. A reduced rate of 
subscription will apply to new members joining midway through the 
subsciption year, the amount to be determined at a general meeting. 

9 PAYMENT OF SUBSCRIPTION. 

i. Annual subscriptions shall be due and payable on the 1st day of July 
each year. For 1984 only subscriptions will cover the period 1 January 
to 31 December. On 1 January 1985 a subscription of one half (1/2) the 
annual subsription shall be due and payable. The full annual subscrip¬ 
tion shall be due and payable on 1st of July 1985. 

ii. Membership will lapse after subscription is two months overdue. 

iii. Unfmancial members may not vote, or receive the benefits of membership. 

10 MEMBERSHIP CARDS. 

Membership Cards will be issued to all members. 

U REGISTER of members. 

The Secretary shall keep and maintain a register of members in which shall 
be included the full name and address of each member, and the status of the 


member ie. Ordinary, Life, or Honorary. An updated copy of this register 
shall be given to the Treasurer and Editor at least every three months. 

12. LEVIES. 

At annual general meetings or special general meetings a levy not exceeding 
10% of the annual subscription may be imposed. 

13. RESIGNATION OF A MEMBER. 

A member may resign his membership at any time by letter addressed to: 
The Secretary 

Commodore User Group (ACT) 

PO Box 599 
BELCONNEN 
ACT 2616 

14. SUSPENSION OF A MEMBER. 

i. The quorom of the committee may suspend, for a period not exceeding 
three (3) months, the rights and priveleges of membership of any member 
who, in its opinion, has wilfully infringed or disregarded any rules or 
whose conduct as a member has, in the opinion of the quorom, been 
contrary to the best interests of the group. 

ii. A quorom of the committee shall not suspend such rights and priveleges 
without first giving that member the opportunity to appear before them to 
show cause why his rights and priveleges should not be suspended. 

iii. Should a member be suspended for a second time within 18 months, 
consideration will be given to termination of membership at a general 
meeting. 

15. LIABILITY OF MEMBERS. 

No member shall be personally liable to contribute to the discharge of any 
debts or liabilities incurred by the committee. 

16. FUNDS. 

The funds of the group shall be derived from: 

i. Annual subscriptions payable by the members of the group, 

ii. Moneys received from the sale of goods and the provision of services, 

iii. Donations and bequests. 

BY-LAWS 

1. ANNUAL GENERAL MEETING. 

The annual general meeting shall be held once yearly on or before the 
thirtieth of April. 

2 . NOTICES. 

Twenty one (21) days notice of the annual general meeting shall be given to 
every member by the placement of an advertisement in the Canberra Times 
and in the groups’ newsletter not less than 21 days before the meeting. 

3. MEMBERS MAY CALL AN ANNUAL GENERAL 
MEETING. 

If the committee does not call an annual meeting on or before the thirtieth 
(30th) of April in any year, fifteen (15) members may call the annual 
meeting for any day in May not less than fourteen (14) days before the date 
appointed by them for the meeting. 

4 SPECIAL GENERAL MEETINGS. 

Special general meetings may be called at any time by a quorom of the 
committee by giving twenty one (21) days notice to each member by notice 
in the group newsletter. No business other than that specified in the notice 
shall be transacted at a special general meeting. 

5. COMMITTEE MEETINGS. 

The committee shall meet as necessary to conduct the business of the group. 
Committee meetings shall be held at least once each quarter. Group 
members other than committee members may, at the invitation of the 
President, attend committee meetings and contribute to the business of the 
meeting but may not vote on resolutions taken by the committee. 

6 ORDINARY MEETINGS. 

i. The group shall normally hold regular twice monthly meetings. These 
are not business meetings but are for the purpose of providing activities 
and talks of interest to members. 

ii. An ordinary meeting may become a special general meeting, provided 
that the required notice is given within the provisions of clause 4 of the 
by-laws. 

7 NOTICE OF MOTION. 

Notices of Motion for the annual general meeting must be received by the 
Secretary before the twenty eight (28th) of February. 

For 1984 only - 31st March. 
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8 . QUORUM. 

No business shall be conducted unless a quorum is present. If a quorum is 
not present a special general meeting shall be called as soon as practicable. 

9. AGENDA FOR ANNUAL GENERAL MEETING. 

i. Opening of the meeting. 

ii. Apologies. 

iii. Minutes of the previous Annual General Meeting and committee 
meeting. 

iv. Reports from the committee. 

v. Election of officers. 

vi. Notices. 

vii. General business. 

10 VOTING. 

Voting at general meetings shall be by show of hands or otherwise as the 
President may direct 

11. PRESIDENT. 

At all business meetings the President shall preside, in his absence the 
meeting shall be conducted by the: 

i. Vice-President. 

ii. Treasurer. 

12. MINUTES. 

The Secretary shall record the proceedings of general meetings and 
committee meetings and make them available for perusal by any member. 

13. FINANCIAL YEAR. 

The financial year for the group shall end on the twenty eighth of February in 
each year, to which day the accounts of the group shall be balanced and 
audited. For 1984 only, the financial year shall end on the thirty first (31 st) 
of March. 

14 POWER TO VARY CONSTITUTION AND 
BY-LAWS. 

This constitution and by-laws may be added to, repealed, or ammended by 
resolution at any general meeting provided that no such resolution shall be 
deemed to have passed unless it be carried by two thirds (2/3) of members 
present. 

15. ELECTION OF COMMITTEE. 

At the annual general meeting of the group, nominations having being called, 
six (6) members shall be elected to the following offices: 

i. President 

ii. Vice President 

iii. Secretary 

iv. Treasurer 

v. Librarian 

vi. Editor 

plus six (6) ordinary committee members to assist with the preceding offices. 
All nominations shall require a seconding voice and consent of the 
nominated member to be accepted. 

16. TENURE OF OFFICE. 

Committee members shall hold office until the next annual general meeting 
or as otherwise determined at a special general meeting. 

17. CASUAL VACANCIES. 

If a casual vacancy occurs, due to the death of a committee member or 
resignation from the committee, the vacancy may be filled by a show of 
hands, or by appointment by the committee until the next annual general 
meeting or special general meeting. 

18 DUTIES OF OFFICE BEARERS. 

i. President. 

a. The President shall preside at business and committee meetings. 

b. The President or his representative shall represent the group on 
official business. 

c. The President shall present to members at the annual general meeting 
a report on activities or business that have significantly affected the 
state of affairs of the group. 

u. Vice-President. 

a. The Vice-President shall assist the President in the discharge of his 
duties, and in the absence of the President shall act in his place. 


iii. Secretary. 

a. The Secretary shall record the proceedings of all general meetings 
and committee meetings and make them available for perusal by any 
member. 

b. The Secretary shall maintain a register of members as in clause II of 
the constitution. 

c. The Secretary shall issue all notices for meetings and other such 
notices as may be directed by the committee and members. 

d. The Secretary shall present to the committee all correspondence 
directed to the group which may be received and shall prepare 
outgoing correspondence. 

e. The Secretary will present to the Treasurer a monthly detailed 
account of moneys spent by him with receipts for any item in excess 
of twenty dollars ($20). 

iv. Treasurer. 

a. The Treasurer shall collect and receive all moneys on behalf of the 
group, shall give receipts for the same, and bank such moneys in an 
account in the name of the group at a financial institution approved 
by the committee. 

b. The Treasurer shall maintain a proper system of accounting for all 
moneys received and disbursed on behalf of the group. 

c. The Treasurer shall produce a statement of accounts each quarter 
and publish the statement in the groups newsletter. 

d. The Treasurer shall submit accounts for audit for the year ended the 
twenty eighth (28th) of February for submission at the annual 
general meeting. 

For 1984 only - 31st March. 

v. Librarian. 

a. The Librarian shall maintain the group library of publications, 
periodicals and public domain software. 

b. The Librarian shall arrange for the provision of public domain 
software from the group library to members as requested. 

c. The Librarian shall collect and receive, on behalf of the group, all 
moneys from members in payment for provision or copying of public 
domain software, and shall account to the Treasurer for this money. 

vi. Editor. 

a. The Editor shall edit and publish the group newsletter. 

b. The Editor shall distribute the group newsletter to members at 
meetings or by post if so requested. 

c. The Editor will present to the Treasurer a monthly detailed account 
of moneys spent by him with receipts for any item in excess of twenty 
dollars ($20). 

19.POWERS OF COMMITTEE. 

The committee shall have the power to: 

i. conduct the general business of the group. 

ii. reserve acceptance of an application for membership subject to the 
provisions of clause 4 iii of the constitution. 

iii. suspend a member subject to the provisions of clause 14 of the 
constitution 

iv. produce and circulate a newsletter, and to pay for the same out of club 
funds. 

v. purchase or otherwise acquire books, periodicals, programs and disks for 
the group library. 

vi. open an account with a financial institution for the purpose of conducting 
the group s business. Cheques (Withdrawal forms) to be signed by any 
one of the committee members nominated from the President, Secretary, 
Treasurer, or Editor. 

vii. spend a maximum of two hundred dollars ($200) on capital equipment 
on any one occasion without a majority vote from members. 

viiiiill positions falling vacant on the committee until the next annual general 
meeting or special general meeting. 

20 INTOXICATING LIQUOR. 

No person, whether a member of the group or not, shall bring to or consume 
intoxicating liquor at meetings of the group without the approval of the 
committee. 

21 DISSOLUTION OF THE GROUP. 

If at any annual general meeting or special general meeting a resolution for 
the dissolution of the group shall be passed by a majority of the members 
present and such resolution shall at a special general meeting held not less 
than one month thereafter at which not less than one half of the members 
shall be present be confirmed by a resolution passed by a majority of two 
thirds of the members voting theron the committee shall thereupon or at such 
future date as shall be specified in such resolution proceed to realise the 
property of the group and after the discharge of all liabilities shall divide the 
same either equally among all the current ordinary and life members, or in 
other ways as determined by the members, and upon the completion of such 
division the group shall be dissolved. 
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Random Numbers on the C64 

by Greg Perry 


Want to calculate your Pools or Lotto entries, or write a 
simulation program ( or game) that mimics statistical 
results? You need random numbers! Unfortunately, many 
users seem to get confused when trying to use random 
numbers on the VIC/C64. (Especially those who have 
grown up with the earlier PETs!) In thisarticle, we will take 
a look at the RND function and how to use it on the 
VIC/C64. 

The first principle to establish is that random numbers 
are not in fact truly “random”, if indeed such can exist. The 
RND(X) function calculates a determinate floating-point 
number between 0.0 and 1.0 by a mathematical formula. 
Depending on the sign of the argument fed to the 
argument fed to the equation (X can be +ve, -ve or 0) a 
particular pseudo-random number will be generated. The 
“seed” for each calculation is stored in memory locations 
139-143. These are set to a constant when the computer 
is switched on (on my C64 (all?) to 128,79,199,82,88 to 
give the first RND(1) of .185564016), and every sub¬ 
sequent call of RND resets (re-seeds) this value. 

RND(+ve) 

Any positive argument generates the the next pseudo¬ 
random number from the current seed, then resets the 
seed for the next calculation. The actual value of the 
argument is irrelevant, RND(1) and RND(1256) do the 
same job. This process generates numbers in an appar¬ 
ently infinite sequence. However, West in “Programming 
the PET/CBM” suggests that after about 45000 repet¬ 
itions the numbers lose their “randomness”. This is the 
argument that should be used in most cases. 

RND(O) 

A zero argument takes its seed from the system 
hardware clock which changes every millionth of a 
second over a range of 0-16383. (From the CIA timer at 
locations 56324 and 56325.) It DOES NOT seed from the 
Tl variable as some books say. Although RND(O) probably 
can be considered to generate the most “random” 
numbers, the problem is that the seed can only be one of 
16384 possible values at best. And, since every 60th of a 
second the SAME seed value is used, as well as the fact 
that most programs perform a sequence of repetitive 
instructions, there is a fair chance of generating a very 
similar “random” number, for example 0.308594167 and 
0.308594823. This causes difficulty when we wish to 
generate numbers over a small range, say 0-30. 

RND(-ve) 

A negative argument is quite different. It seeds the 
random number generator with a specific value 
depending on the value of the argument. This is always 
the same for the same argument. A RND(-ve) is used 
specifically to initialize the random seed to a set value so 


that we may generate a specific repeatable sequence of 
random number with subsequent calls to RND(+ve). The 
best way to generate a “random” seed for a non- 
repeatable sequence is with the jiffy clock variable Tl. 
That is, use X=RND(-TI) at the beginning of the program, 
then get the random numbers with RND(+ve). 

The best way to see the difference between RND(O) 
and RND(+ve) is by a small program which POKES the 
screen in a supposedly random fashion. 

100 REM RANDOM SCREEN POKE 
110 FOR 1=0 TO 10000 
120 N=RND(1)*1000 

130 POKE 1024+N, 1 :REM SCREEN RAM 
140 POKE 55296+N,l :REM — COLOUR RAM 

** Line 140 is only needed on C64s made before 
approximately January 1984. 

RUN the program and see what happens. The program 
will fill the screen with the ‘A’ character in a fairly random 
pattern until, at the end, if we let it run for long enough, the 
whole screen will be filled. 

Now, change line 120 to use RND(O), clear the screen 
and re-RUN the program. Notice the difference? This time 
the ‘A’ character fills the screen in a definite pattern. No 
matter how long we let the program continue, the whole 
screen will never be filled! In this case, RND(O) will 
generate only 256 different numbers. 

Using random numbers 

Since the RND function generates a number between 
0.0 and 1.0, it is not of much direct use for most cases. 
What is normally required is a random whole number 
(integer) between limits, say between 1 and 36 for the 
pools. This is done by 

N=INT (RND( 1 )*(E-S+1 )+S) 

where S=1 and E=36 then N=INT( RND(1)*36+1). This 
will also generate the special case of numbers between 
- 1 to +1 by 
N=INT(RND( 1 )*3-l) 

Let’s finish with a full “6 from 36" pools program (or lotto, 
or whatever your addiction). 

100 DIM N(6) 

110 X=RND(-TI) 

120 X=INT (RND( 1 )*36+1) 

130 FOR 1=1 TO N: IF X=N(I) THEN 120 

140 NEXT: N=N+1: N(N)=X 

150 IF N<6 THEN 120 

160 PRINT “YOUR WINNERS (!) ARE" 

170 FOR 1=1 TO 6: PRINT N(I):: NEXT 

.. ps the Commodore Magazine (and me!) will expect a 
donation if you win! 

(c) Greg Perry 1984, 

may be reproduced with acknowledgement. 
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prog rams 

STRATEGY 

Reprint from PANDORA - KIM BOOKS Adventure Club 
Newsletter 

Ever wondered how a computer can play against a 
human player in strategy games? Well Al (Artificial 
Intelligence) is a study on it own. The program below 
might give you a little insight into Al. 

If you are fighting a battle then your strategy has to take 
into account the weather conditions, location of the 
enemy, terrain etc. 

Many adventures ignore these and other elements, 
such as range of influence of magic spells. 

Map weighting is the art of reducing or increasing the 
hero or enemy’s power according to the grid location he 
or she is in. You are virtually creating a template or 
second map that fits over your adventure map reflecting 
the various elements. 

For example your hero may only use 2.5% of energy 
when walking on flat ground or 12.5% when climbing a 
hill. He/she then has the decision to take a short cut 
across a hill and end up with less physical strength or a 
slower route around the hill but get there with more 
physical strength. 

Imagine an adventure. You and your friend are moving 
through a 10 x 10 adventure grid, within this grid are two 
wizards who have combined their forces to over power 
you. 

MW 1.1 is a slow BASIC listing of how you might handle 
this (ML is really necessary to speed things up). 

First set up the program. - LINES 1-60 

Now determine where on the 10x10(11-110) grid that 
you wish to place the heros and give them each a value of 
+50-LINE 62 

Same for the wizards only with a value of -50- LI NE 63 

Let us now look at the map on the screen - LINES 69- 
100 

Sofarnothing extraordinary. But now we will put a —1 in 
every grid location that is adjacent to a —ve value and +1 
when adjacent to a +ve. We will also introduce colour to 
help identify areas of influence. - LINES 120-310 

To do this we have to create a second grid to transfer 
the adjacent values from the first. - LINES 358-420 

Now we have a useful pattern of influence and you can 
move heroes and wizards around the grid trying to corner 
and separate each of the opposing forces (reRUN for 
each move.) 


The influence values can give the computer the 
information to evaluate various move. This program is to 
demonstrate the process only. 


1 GOTO 50 

2 SAVE “@0:MW 1.1”,8: VERIFY “MW 1.1”,8: STOP 
50 B=-4 

54 DIM A( 121): DIM C(121) 

60 PRINT “[CLRJDOWN3]” 

62 INPUT “A1”;M1: INPUT “A2”;M2:A(M1)=50:A(M2)=50 

63 INPUT “D1”;M3: INPUT “D2”;M4:A(M3)=-50:A(M4)=-50 

69 FOR 1= 11 TO 110: IF I=M 1 OR I=M2 OR I=M3 OR I=M4 THEN 
71 

70 A(I)=0 

71 B=B+4 

80 IF B>36 THEN PRINT CHR$(13) CHR$(157):B=0: IF A<10 
THEN PRINT CHR$(17); 

90 A=A(I) 

100 PRINT TAB(B) CHR$(145)A: NEXT I 
120 PRINT “[HOME,DOWN]”:X=l 

259 PRINT “[CLR.DOWN3]” 

260 FOR 1=11 TO 110:C(I)=0 

261 IF A(I)>0 THEN C(I)=A(I)+1 

262 IF A(I—1 )>0 AND B<36 THEN C(I)=C(I)+1 

263 IF A(I+1)>0 AND B<>32 THEN C(I)=C(I)+1 

264 IF A(I-10)>0 THEN C(I)=C(I)+1 

265 IF A(I+10)>0 THEN C(I)=C(I)+1 

266 IF A(I+11 )>0 AND B<>32 THEN C(1)=C(I)+1 

267 IF A(I—11 )>0 AND B<36 THEN C(I)=C(I)+1 

268 IF A(I+9)>0 AND B<36 THEN C(I)=C(I)+1 

269 IF A(I-9)>0 AND B<>32 THEN C(I)=C(I)+1 

271 IF A(I)<0 THEN C(I)=A(I)-1 

272 IF A(I-1)<0 AND B<36 THEN C(I)=C(I)-1 

273 IF A(I+1)<0 AND B<>32 THEN C(I)=C(I)-1 

274 IF A(I-10)<0 THEN C(I)=C(I)-1 

275 IF A(I+10)<0 THEN C(I)=C(I)-1 

276 IF A(I+11)<0 AND B<>32 THEN C(I)=C(I)-1 

277 IF A(I-11)<0 AND B<36 THEN C(I)=C(I)-1 

278 IF A(I+9)<0 AND B<36 THEN C(I)=C(I)-1 

279 IF A(I-9)<0 AND B<>32 THEN C(I)=C(I)-1 

285 B=B+4:C=C(I):Z=150: IF 0=0 THEN Z=5: IF C>0 THEN 
Z=154 


290 IF B>36 THEN PRINT CHR$( 13) CHR$( 157):B=0: IF C(I-1 )<- 
10 AND C(I-1)<10THEN PRINT CHR$(145): GOTO 300 

291 IF B=0 AND C<10 AND 0-10 THEN PRINT CHR$(13) 
CHR$(145) 

300 PRINT TAB(B) CHR$(Z) CHR$(145)C 
310 NEXT 

320 PRINT “[HOME.DOWN]” 

340 IF X=3 GOTO 340 

358 PRINT “[CLR.DOWN3]” 

359 FOR P=10 TO 250: NEXT : PRINT “[CLR.DOWN3]” 


360 FOR 1=11 TO 110:A(I)=0 

361 IF C(I)>0 THEN A(I)=C(I)+A(I)+1 

362 IF C(I-1)>0 AND B<36 THEN A(I)=A(I)+1 

363 IF C(I+1)>0 AND B<>32 THEN A(I)=A(I)+1 

364 IF C(I-10)>0 THEN A(I)=A(I)+1 

365 IF C(I+10)>0 THEN A(I)=A(I)+1 

366 IF C(I+11)>0 AND B<>32 THEN A(I)=A(I)+1 

367 IF C(I-11)>0 AND B<36 THEN A(I)=A(I)+1 

368 IF C(I+9)>0 AND B<36 THEN A(I)=A(I)+1 

369 IF C(I-9)>0 AND B<>32 THEN A(I)=A(I)+1 

371 IF C(I)<0 THEN A(I)=C(I)-1 

372 IF C(I-1)<0 AND B<36 THEN A(I)-A(I)-1 

373 IF C(I+1)<0 AND B<>32 THEN A(I)=A(I)-1 

374 IF C(I-10)<0 THEN A(I)=A(I)-1 

375 IF C(I+10)<0 THEN A(I)=A(I)-1 

376 IF C(I+11 )<0 AND B<>32 THEN A ( I )"'" ( y 1 

377 IF C(I-11)<0 AND B<36 THEN A(I)-A(IH 

378 IF C(I+9)<0 AND B<36 THEN A(I)=A(IH 

379 IF C(I—9)<0 AND B<>32 THEN A(I)-A(Ir' 

385 B=B+4:A=A(I):Z=150: IF A>=0 THEN Z=5: IF A>0 THEN 


2=154 

390 IF B>36 THEN PRINT CHR$( 13) CHR$( 157):B-0: IF A(I-1 )<- 
10 AND A(I—1 )>] 0 THEN PRINT CHR$(145): GOTG 4 ”” 

391 IF B=0 AND A<I0 AND A>-10 THEN PRINT CHRS113) 


CHR$(145) 

400 PRINT TAB(B) CHRS(Z) CHR$(I45)A: NEXT I 
420 PRINT “|HOME.DOWN|”:X=X+l: GOTO 259 
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programs 


DATA 

DODGER 


CICADA 


Paul Blair 

The idea for this little routine came from a friend of mine 
whose work entails a lot of statistical processing. He was 
having difficulty handling data, because the arrays he set 
up for efficient operation were not big enough if all data 
was to be read in at any one time. Could he enter all the 
data, but operate selectively on only parts of it? 

Basic uses a pointer to keep track of DATA values. You 
may have a table of 200 items, and read them ten at a time 
at various parts of your program. When you READ for the 
first time, the pointer is aimed at the very first DATA item. 
With each READ, the pointer moves on to the next value. 
You may jump back to the start of your DATA with 
RESTORE, but there is no standard way (apart from 
READing all the intermediate values) of jumping forward. 
Or so I thought. 

The C64 DATA pointers are stored in locations 65 and 
66 (62 and 63 in PETs). By POKEing the values found at 
locations 61 and 62 (58 and 59) into the DATA pointers, 
the computer is fooled into READing the DATA beyond 
the current pointer to the program - hence the physical 
set up of the demonstration program that follows. 

Try it for yourself - it works! 

10 REM:DATA DODGER 
20 : 

30 REMiPAUL BLAIR 
40 : 

50 REM: TO PERMIT SELECTION OF 
60 REM: DATA FROM A LONG LIST. 

70 : 

500 INPUT“WHICH BLOCK”;A 
510 ONAGOSUB 600,700,600,900:END 
520 : 

600 PL=PEEK(61):PH=PEEK(62) 

601 POKE65.PL: POKE66,PH 

620 READA$,B$,C$:PRINTA$,B$,C$ 

640 DATA FIRST,FRED,3 
650 RETURN 
660 : 

700 PL=PEEK(61 ):PH=PEEK(62) 

701 POKE65,PL:POKE66,PH 
710 DATA SECOND 

720 READA$:PRINTA$ 

750 RETURN 
760 : 

800 PL=PEEK(61):PH=PEEK(62) 

801 POKE65,PL:POKE66.PH 
810 DATA THIRD 

820 READA$:PRINTA$ 

850 RETURN 
860 : 

900 PL=PEEK(61):PH=PEEK(62) 

901 POKE65.PL:POKE66,PH 
910 DATA“FOURTH” 

920 READA$:PRINTA.$ 

950 RETURN 


300 Baud 

DATA MODEMS 



CICADA 300 
CICADA 300T with 
telephone 
CICADA 300 
for use with 
Commodore 64 
and Vic 20 computers 



ro= ° CENTRE /INDUSTRUES 

= ELECTRONICS & 

TELECOMMUNICATIONS 
= EXPERTISE 


1X7 Allamhie Road. Allamhie Heights. NSW 2100 Telex:AA2267 I 
NSW Call Sarkis .02, 451 5555 or Alex (02> 449 8233 
VIC, S.A., W.A., TAS Ian |03| 7X7 7063 QLD Bill i07l 397 0888 


300..$239.00 


• 300T...$269.00 • 300C...$259.00 
® 300CT...$289.00 


STOP PRESS! 


Commodore Owners! 

CICADA MODEM D 

D > »unf in RRP f >r ALL 

300 C8 and 300 CT 


R.nr, CENTRE INDUSTRIES NOW ON 
HOTLINE 

(02) 451 6244 

To ensure you don t miss this special offer 
OFFER ClOSFS 30 1 85 
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prog rams 

DICE 

all machines 

Reprinted from PANDORA the Kim Books Adventure Club 
Newsletter. 

The program allows you to throw any number of die of 
any number of sides and modify the results. 

If you wish to ROLL 3, twelve sided die and multiply the 
results by 100 you enter:- 

3D12*100 


1 GOTO 3 

2 SAVE “@0:DICE”,8: VERIFY “DICE”,8: STOP 

3 REM 

100 W$=“+-*/” 

110 PRINT “ROLL”; 

120 INPUT R$ 

130 P=1 
140 N=0 
150 S=0 
160 OP=0 
170 M=0 

180 LR=LEN (R$) 

190 IF LR=0 THEN 430 
200 GOSUB 660 
210 N=Q 

220 IF P>=LR THEN 430 
230 P=P+1 
240 GOSUB 660 
250 S=Q 

260 IF P>LR THEN 430 
270 OP=l 

280 IF Q$=“+” THEN 360 
290 OP=2 

300 IF Q$=“-” THEN 360 
310 OP=3 

320 IF Q$=“*” THEN 360 
330 OP=4 

340 IF Q$=“/” THEN 360 
350 OP=0 

360 IF OP=0 THEN 430 
370 P=P+1 

380 IF P>LR THEN 350 
390 GOSUB 660 
400 M=Q 

410 IF M>0 THEN 430 
420 OP=0 

430 IF N>0 THEN 450 
440 N=I: IF S>0 THEN 470 
450 IF S>0 THEN 470 
460 S=6 

470 IF NOl THEN 500 

480 R=INT ( RND (1 )*S)+1 
490 GOTO 520 

500 R=INT (,5+N*(S-l)*.51 RND (1))+N 
510 IF RND (1)<.5 THEN R=N*(S+1)-R 
520 ON OP GOSUB 580,600,620,640 
530 PRINT “FOR”;N;”D”;S 
540 IF OP=0 THEN 560 

550 PRINT MID$(WS,OP.l):M 


560 PRINT “THE RESULT IS”;R 

570 GOTO 100 

580 R=R+M 

590 RETURN 

600 R=R-M 

610 RETURN 

620 R=R*M 
630 RETURN 
640 R=R/M 
650 RETURN 
660 Q=0 

670 Q$=MID$(RS,P, 1) 

680 IF VAL (Q$)<> ASC (QS)-48 THEN 720 

690 Q=Q*10+ VAL (Q$) 

700 P=P+1 

710 IF P<=LR THEN 670 
720 RETURN 

ADVENTURE 

WORKSHEET 

- all machines 

From Michael Spiteri’s new book VIC FAMILY BOOK. 

You'll need a printer for this one. The program prints out 
worksheets for adventurers to keep their mapping notes 
on. 

1 GOTO 3 

2 SAVE “@0:ADVENTURE WORKSHEET”,8: VERIFY 
“ADVENTURE WORKSHEET”,8: STOP 

3 REM # LINES 1, 2 & 3 OPTIONAL # 

10 PRINT “(CLR,SPACE]ADVENTURE WORKSHEET” 

15 PRINT “(DOWN2,SPACE](C) MICHAEL SPITERI 1984” 

20 PRINT “|DOWN2,SPACE]PREPARE PRINTER.” 

25 PRINT “]DOWN,SPACE]HIT ANY KEY.” 

30 GET A$: IF A$=“” THEN 30 
35 OPEN 2,4 
40 CMD 2 
45 FOR 1=1 TO 10 
50 PRINT#2 

60 PRINT#2 ”|0,<YXYXY>,P,SPACE2,0,<YXYXY>,P, 
SPACE2,0,<Y><Y><Y>,P,SPACE2,0,<Y><YXY>,P, 
SPACE2,0,<YXYXY>,P,SPACE2,0,<YXYXY>,P, 
SPACE2,0,<YXYXY>,P,SPACE2,0,<YXYXY>,P, 
SPACE2,0,<YXYXY>,P]” 

65 PRINT#2,“|<H>,SHSPACE3,<N>,SPACE2,<H>,SPACE3,< 
N>,SPACE2,<H>,SPACE3,<N>,SPACE2,<H>,SPACE3,<N 
>,SPACE2,<H>,SPACE3,<N>,SPACE2,<H>,SPACE3,<N>, 
SPACE2,<H>,SPACE3,<N>,SPACE2,<H>,SPACE3,<N>, 
SPACE2,<H>,SPACE3,<N>|” 

70 PRINT#2,”|<H>,SHSPACE3,<N>,SPACE2,<H>,SPACE3, 
<N>,SPACE2,<H>,SPACE3,<N>,SPACE2,<H>,SPACE3, 
<N>,SPACE2,<H>,SPACE3,<N>,SPACE2,<H>,SPACE3, 
<N>,SPACE2,<H>,SPACE3,<N>,SPACE2,<H>,SPACE3, 
<N>,SPACE2,<H>,SPACE3,<N>]” 

75 PRINT#2“[L,<@X@X@>,@,SPACE2,L,«®X@X@>, 
@,SPACE2,L,<@X@>«aj>,@,SPACE2,L.<@><@><@>, 
@,SPACE2,L,<@X@X@>,@,SPACE2,L,<@>«g)><@>, 
@,SPACE2,L,<@><@X@>,<a,SPACE2.L,<@><@><@>, 
@,SPACE2,L,<<®X<&X@>,@|” 

80 NEXT I 
85 PRINT#2 

90 PRINT#2, CHR$(14)“INVENTORY:|SPACE8|NOTES:” 

95 PRINT#2, CHR$(15) 

100 CLOSE 2 
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Fuzzy Sort 
on the Cl6 

Ever wondered how a computer could handle peoples 
names that are spelt in peculiar ways. If we can get 
confused between ‘Johnston and Johnstone’ the poor 
old computer is also going to get perplexed. 

There is a way; its called SOUNDEX CODE. Developed 
for the 1890 USA census. The code is based on 
pronunciation. The system uses a special method of 
coding text so that similar sounding names are 
conveniently grouped under the same or almost the 
same code number. 

The technique consists of the following steps:- 

1. Retain the first letter of the name. 

2. Remove all other occurances of a, e, i, o, w, y, q and 
punctuation marks. 

3. Use a given code to number all remaining letters 
starting from the second one. 

4. Retain only the first letter if two or more adjacent letters 
have the same code number. 

5. The final code number is the first letter followed by the 
first three numbers, i.e. LLOYD - L is the initial letter, the 
second L is ignored because it would have the same code 
as the first letter, O and Y are ignored (see 2) and D has a 
code number of three. Code is L3 expanded to three 
number L300. 


SOUNDEX CODES 


letters 

Code 

f p V 

1 

c g j k s x z 

2 

d t 

3 

1 

4 

m n 

5 

r 

6 

The program below demonstrates how this works and is 
suitably REM’d so that you can lift out sub-routines for 

your own Cl 6 programs. 


This listing is easily modified to run on any Commodore 

computer. 


FUZZY SORT 16 



1 GOTO 3 

2 SAVE “<5>0:FUZZY SORT”,8: VERIFY "FUZZY SORT”.8: STOP 

3 REM 

9 REM ############################## 


prog rams 

10 REM FUZZY SORT USING SOUNDEX CODES 

11 REM ############################## 

30 DIM SC$(26),N$(200,2) 

39 REM ############################## 

40 REM SOUNDEX CODES FOR ALPHABET 

41 REM ############################## 

50 FOR J=1 TO 26: READ SCS(J): NEXT 

59 REM ############################## 

60 REM READ IN NAMES 

61 REM ############################## 

70 PRINT “[CLR]”; TAB(8);“SOUNDEX CODING DATA”: PRINT 
80 TN=130: FOR J=1 TO TN: READ N$: GOSUB 110 
90 N$(J,1)=N$:N$(J,2)=CD$: PRINT N$;“ = ”;N$(J,2): NEXT: 
GOTO 180 

99 REM ############################## 

100 REM TRANSFER TO SOUNDEX CODE 

101 REM ############################## 

110 CD$=LEFT$(N$, 1): L=LEN (NS): LC$=SC$( ASC (CD$)-64): 

IF L=1 GOTO 160 

120 FOR K=2 TO L:A=ASC ( MID$(N$,K,l))-64: IF A<1 OR A>26 
GOTO 150 

130 A$=SC$(A): IF A$=“0” OR AS=LC$ GOTO 150 
140 CDS=CD$+A$: IF LEN (CD$)=4 THEN K=L 
150 LC$=A$: NEXT K: IF LEN (CD$)=4 THEN RETURN 
160 FOR K=1 TO (4- LEN (CD$)):CDS=CD$+“0”: NEXT K: 
RETURN 

169 REM ############################## 

170 REM SHELL-METZNER SORT 

171 REM ############################## 

180 PRINT “(CLRjSORTING INTO”: PRINT “NAME WITHIN 

SOUNDEX CODE ORDER”:N=l 16:M=116 
190 M=INT (M/2): IF M=0 GOTO 290 
200 J=1:K=N-M 
210 I=J 

220 L=I+M: IF N$(I,2)<N$(L,2) GOTO 260 

230 IF N$(I,2)=N$(L,2) AND N$(I,1)<N$(L,1) GOTO 260 

240 F$=N$(I,2):N$(I,2)=N$(L,2):N$(L,2)=F$ 

250 F$=N$(I,1):N$(I,1)=N$(L,1):N$(L.1)=F$:I=I-M: IF I>0 
GOTO 220 

260 J=J+1: IF J>K GOTO 190 
270 GOTO 210 

279 REM ############################## 

280 REM OBTAIN INPUT FROM USER 

281 REM ############################## 

290 PRINT “[CLR]” 

300 PRINT : PRINT “DO YOU WISH TO ENTER A NAME (N)”: 
PRINT 

310 INPUT “OR A CODE (C)”;A$: PRINT 
320 IF A$=“N” GOTO 440 

330 IF ASO“C” THEN PRINT “ INVALID ENTRY.”: GOTO 300 
340 PRINT “CODE MAY BE A LETTER FOLLOWED BY A 
[SPACE6]MAXIMUM OF THREE NUMBERS. 

350 PRINT: INPUT “PLEASE ENTER CODE”;CD$: PRINT 
360 A=ASC ( LEFT$(CD$, 1 ))-64 

370 IF A<1 OR A>26 THEN PRINT “FIRST CHARACTER MUST 
BE A LETTER.”: GOTO 350 

380 L=LEN (CDS): IF L>4 THEN PRINT “CODE TOO LONG.”: 
GOTO 350 

390 J=2: IF L=1 GOTO 430 
400 K=ASC ( MID$(CD$.J, 1 ))-48 

410 IF K<0 OR K>9 THEN PRINT “LETTER MUST BE 
FOLLOWED BY NUMBER(S).”: GOTO 350 
420 J=J+1: IF J<=L GOTO 400 
430 A=L: GOTO 510 

440 PRINT "|CLR|”: INPUT “PLEASE ENTER NAME":N$ 

450 GOSUB 110: PRINT: PRINT "THE SOUNDEX CODE IS " CDS 
L=4 

460 PRINT : PRINT "YOU MAY SEARCH SOUNDEX CODES -" 
470 FOR J=1 TO L: PRINT: PRINT TAB( 10):J:MIDS(CDS. 1 J)- NEXT 
480 PRINT : PRINT "WHICH NUMBER (1 -”;L:“)”;: INPUT Y$ 
490 A=VAL (YS): IF A<1 OR A>L THEN PRINT 
PRINT "INVALID NUMBER ": GOTO 480 
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prog rams 

500 CDS=MIDS(CDS,1,A) 

510 PRINT “[CLRJMATCH AGAINST ”;CDS 
520 PRINT “=====================” 

530 TT=0: FOR 1=1 TO TN:NS=MID$(NS(I,2),1,A) 

540 IF CDS>NS GOTO 570 

550 IF CD$<N$ THEN I=TN: GOTO 570 

560 PRINT NS(I,1):TT=1 

570 NEXT I: PRINT : IF TT=0 THEN PRINT “NO MATCHES 
FOUND.” 

580 PRINT: PRINT “PRESS SPACE TO CONTINUE” 

590 GET AS: IF A$<>“ ” GOTO 590 
600 GOTO 290 

609 REM ############################## 

610 REM SOUNDEX CODES FOR ALPHABET 

611 REM ############################## 

620 DATA 0,1,2,3,0,1,2,0,0,2,2,4,5,5,0,1.0,6,2,3,0,1,0,2,0,2 

629 REM ############################## 

630 REM NAMES 

631 REM ############################## 

640 DATA ABEL,ABLE,ADAMS,ADAMSON,ALDISS,ALDOUS, 

ALLAN,ALLEN,ALLENBURY,ALLENBY 
650 DATA ANDERSEN,ANDERSON 
660 DATA BAILEY,BAILY,BAILLIE,BROWN,BROWNE, 

BROWN ING,BROWNLEE 

670 DATA CLARK,CLARKE,CLARKSON,COLLONGS,COLLINS, 
COOK,COOKE,COOKSON 

680 DATA D’EARTH,DE’ATH,DE ARTH.DEATH.DAVIES, 
DAVIESON,DAVIS,DAVISON,DAVY,DAVYS 
690 DATA EDMONDS.EDMONDSON,EDMUNDS, 
EDMUNDSON,FORSTER,FOSTER 
700 DATA FEATHERSTONE.FEDROSS.FITHERSTON 
710 DATA GARDENER,GARDNER,HAIG,HAIGH,HAIN, 
HAINES,HAYNES 

720 DATA HEWES,HEWETT,HEWITT,HEWISON,HEWSON, 
HUGHES,HUGHS,HUGHSON 

730 DATA IRVINE,IRVING,IOHNSON,JOHNSTON,IOHNSTONE 
740 DATA KNIGHT,KNIGHTLEY,KNIGHTON,KNOGHTS,LEA, 
LEE 

750 DATA LLOYD,LOYD,MACINTOSH,MACKINTOSH, 
MCINTOSH,MATHEWS,MATTHEWS 
760 DATA MARQUAYS,MARS,MARWAYS,MARRYS, 
MCINTYRE,MACKINDER.MCANTRY 
770 DATA MOORE,MORE,NICHOLAS,NICHOLLS,NICHOLS, 
NICHOLSON 

780 DATA OSBORN,OSBOURNE,PHILIPS,PHILLIPS, 
PHILIPSON.PHILLSPSON 

790 DATA QUIN,QUINN,READ,REED,REID,ROBERTS, 
ROBERTSON.ROBBINS.ROBINSON 
800 DATA THOMAS,THOMPSON,THOMSON,UNDERHILL, 
UNDERWOOD,SMITH,SMYTH,SMYTHE,SCHMITT 
810 DATA VINE,VYNE,WALLACE,WALLIS,WALLS,WILLIAMS, 
WILLIAMSON 

820 DATA XERXES,XERKSES,YATES,YEATS,ZACKS,ZAKS, 
ZAX 

REFERENCE 


"Fuzzy Matching", by Bob Chappell, MICROCOMPUTER PRINTOUT, 
August 82 



i AM 

Nor a 

Gdmfutek 

CR/TTE^L 


EASY FILE 

READING by Paul Blair 

Type in this short program and keep it for a rainy day. It 
will allow you to print SEQUENTIAL files direct to your 
computer screen. It uses machine code for speed. I find it 
very useful for scanning EASY SCRIPT files. 

To pause at any time, hold down the SPACE bar. 
Release it to continue. To quit at anytime, press the STOP 
key. 

100 REM: READ SEQUEANTIAL FILE TO SCREEN 

110 SB=828:FB=929:REM BUFFER @ $033C 

120 FORI=STOF:READA:POKEI,A:CK=CK+A:NEXT 

130 IFCK013110THENPRINT“DATA ERROR!”:END 

140 PRINT:PRINT:PRINT“SYS”S“TO RUN PROGRAM”:PRINT 

150 NEW 

160 DATA 160, 3,169,145, 32, 30,171, 32, 96,165,169,0,133,187,169, 2 
170 DATA 133,188,169, 2,133,184,133,185,169, 8,133,186,162, 0, 
189,0 

180 DATA 2,240, 3,232,208,248,134,183, 32, 74,243,166,184, 32, 
198,255 

190 DATA 32,207,255, 32,210,255,165,197,201, 60,240,250, 32,234, 
255, 32 

200 DATA 225,255,208, 2,240, 4,165,144,240,230,165,184, 32,145, 
242, 32 

210 DATA 204,255,76,116,164,147,13,70,73,76,69,32,84,79,32,82 
220 DATA 69, 65, 68, 63, 32, 0 



BY COCKROACH 

Fast load system for Commodore 64 
and 1541 disk drive. 

Load programs five times faster than the usual time, 
without having to plug in a cartridge or load a wedge 
program. 

Our editor allows you to format your own Turbo-64 disks 
and transfer basic or machine code programs to these 
disks from your existing disk library. 

Loading programs from a Turbo-64 disk is not only 5 
times faster, but easier too! 

Simply type LOAD "T” 8, 1 and press return. Within 5 
seconds a menu will appear displaying your Turbo 
program. Simply press the appropriate letter to fast load 
and auto start your selected program. 

SCHOOLS: Turbo-64 disks will function as described 
above via the Vic-switch network! 

Each Turbo-64 disk created by the editor has the fast load 
feature built in during formatting and is unprotected. The 
editor itself is required only for the special format the 
transfer of programs from standard disks and modification 
(renaming and deleting programs) of Turbo-64 disks. 

The editor is not needed to fast load proqrams from a 
Turbo-64 disk. 

SEND $45.00 
PLUS $2.00 P&P 
Or your Bankcard details 

TURBO-ROACH 

Three minute back-up 
also available. 


TO: SCARBOROUGH FAIR 
COMPUTER CENTRE 

P.O. Box 999, Southport, 
Queensland, 4215. 
Telephone: (075) 32 5133 
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Commodore 
Screen Handling 

by Greg Perry 

One of the factors which often distinguish a good 
professional program from one written by the average 
user is the effective use of good screen formatting. Many 
programmers write brilliant programs and then spoil them 
by displaying the results in a matter-of-fact manner. In 
this article, we shall look at just some of the more 
advanced methods of setting up and displaying 
information on the screen of the VIC and C64, not 
forgetting the Commodore 4000/8000 series. I am not 
talking about sprites, fancy graphics, or multicolour 
displays, but simply methods of displaying information on 
the screen in an ordered manner that is both pleasing to 
the eye and clear to the user. Don’t be put off by the word 
advanced; the concepts are easy to learn and use in 
everyday programming. 

First, allow me to suggest a few general rules for 
formatting the screen output. Here we have a small 
problem in that every programmer has their own ideas, 
however, for the sake of this article, let us agree on the 
following 

1. Reserve the top 1-5 lines for screen 
headings. Use these to display the program 
name, main menu heading and any sub¬ 
headings as required. 

2. Line 5 is for column titles maybe. 

3. Reserve the bottom three lines (23-25) for 
error or other messages. The user then 
always knows where to lookforinformation. 

4. Never allow the screen to scroll under its 
own accord. (Maybe use smooth scrolling if 
it is required?) When printing a long list of 
information, display it one screen at a time, 
in sections, and preferably with an option 
between screens which allows the user to 
move backward or forward or abort the 
procedure. 

5. Always display ALL the title or field names 
on the screen before inputting any 
information. This shows the user what is 
expected for each entry and minimises 
confusion. 

6. Don’t use too many colour changes, two, 
maybe three are enough. More than this 
rapidly becomes annoying. Use colour to 
highlight special features not to show off 
how many different colours you can 
program. Pick suitable colour matches for 
screen and border (often the same), and 
character colours that are easy on the eye 
and STICK TO THEM except for special 
occasions. 

Ok, now let’s look at how to implement some of these 
ideas with particular reference to screen positioning. 


Many versions of the BASIC languages used on micros 
have included a PRINT AT facility where the line and 
column for input or output of screen information can be 
specified. With most of the Commodore machines so far, 
such a direct command has not been part of the BASIC 
language. However, since the operating system prints 
the next character at the current cursor position, if we set 
this to the desired position first, we can print anywhere on 
the screen, in any order, at any time. This is the key to 
good screen handling. 

Thereaseveral methods we can use. Let’s lookthrough 
the three most common ones and you can chose the one 
which suits you best. 

The oldest and most universal method, which works on 
all machines without alteration (except for minor changes 
for the screen width of the VIC or the 8000 series), is to 
use two strings of cursor movements such as 

V$ = “[DOWN25] : H$ = “[RIGHT40] 

and then use the LEFTS function to select the required 
number of cursor movements. For example to print 
“HELLO” on line 10, starting at column 10, we could use 

PRINT “[HOME]”; LEFT$(V$,10); LEFT$(H$,10);”HELLO” 

For the horizontal positioning to a specific column, it 
often may be easier to the the old faithful TAB(10) instead. 
Only problem is that with the TAB command we cannot go 
backwards along a line. 

The second method also works on all machines, but 
requires different values for the different versions of 
BASIC between the PET 2000, 4000/8000 and VIC/C64 
machines. Since the computer itself has to keep track of 
the current position of the cursor, all one has to do is fool 
the operating system into putting it where we want. If we 
know where to look that is! 

There a number of locations in the lower memory of all 
Commodore machines which control the cursor. (Take a 
look at a good memory map.) These not only control the 
current screen line and column, but also control whether 
the cursor should flash (useful for getting the cursor to 
flash on GET statements), the current character under 
the cursor, the current character colour, and many others. 
For now let’s stick to the point. The cursor line and column 
are contained in the locations 

CBM 2000** 4000/8000 VIC/C64 


Line 245 216 214 

Column 226 198 211 

** Does anyone out there still use an early PET with ‘Rev 
2’ BASIC 1.0 ?) 

All we now have to do is set these locations with the 
required values (with POKE statements) right? Unfort¬ 
unately, its not quite that simple. Try the following. Clear 
the screen and enter the following line. (NOTE: for other 
than the VIC/C64 change the locations according to the 
table) 

POKE 214.10 : PRINT "HELLO” : PRINT "PAUL" 
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What happens?. HELLO is on the second line and 
PAUL is on the twelfth! 

The problem lies in location 214. This contains not the 
current line, but the next line instead. One other problem, 
screen lines are numbered from the top as 0,1,2... etc. 
Therefore use as follows 

POKE 214,H : PRINT : POKE 211 ,C 

where L is the required line and C the column. For 
example, 

POKE 214,9 : PRINT : POKE 211,10: PRINT “HOW’S THE 
WEATHER” 

The blank PRINT after the POKE of the screen line is 
VITAL. You cannot use PRINT “HELLO” or the like. Also, 
since it is not possible to POKE a negative value, this 
method will not allow one to position to the top screen 
line - that’s what PRINT “[HOME]” is for anyway! There 
are several advantages with this method as we shall see 
later. 

The third method only works on the VIC/C64 as far as I 
know. The KERNAL (the set of operating system 
instructions in higher memory) has a built in routine 
called PLOT which can be readily accessed through 
machine code to set the cursor position or read the 
current cursor position. (Maybe this was originally to 
provide ana BASIC ‘PRI NT AT command?) It can be used 
to set the cursor as follows 

POKE 781, Line 
POKE 782, Column 
SYS 65520 

For example, 

POKE 781, : POKE 782,10 : SYS 65520 
PRINT “BIT COLD IN CANBERRA EH PAUL?” 

WARNING: With both methods 2 and 3, NEVER set the 
line numbergreaterthan 24 or column greaterthan 79 or 
the computer may crash. Try it and see. (The computer 
actually keeps a list of the addresses (memory locations) 
of the start of each screen line therefore setting the line 
to greater than 24 upsets this sequence with strange 
results.) 

From here on, let us use method 2 (since it’s my 
favourite!) to demonstrate some examples of screen 
positioning. Unfortunately, I’m running out of space in this 
article, therefore, you should enter the following, RUN 
them to see what happens, and if you do not understand 
any points drop me a line. 


Example 1: 


With the TAB command it is impossible to print 
leftwards of the current cursor position. With location 
211, this is easy, allowing one to do some things that are 
quite difficult to do by other methods. 


100 PRINT “[CLR]USING NOTHING” 

110 FOR C=39 TO 0 STEP -1 : PRINT C; : NEXT 
130 POKE 214,5 : PRINT : PRINT “USING TAB” 

140 FOR C=39 TO 0 STEP -1 : PRINT TAB(C)C; : NEXT 
150 POKE 214, 15 : PRINT : PRINT “USING POKE 211” 
160 FOR C=39 TO 0 STEP -1 : POKE 211,C : PRINT I; : 
NEXT 


Example 2: 


General screen positioning 

10 FOR 1=1 TO 1000 
20 L= RND(1)*22:C=RND(1)*35 
30 GOSUB 100 
40 PRINT “HERE” 

50 FOR J=1 TO 500: NEXT 
60 GOSUB 100 

70 PRINT “ ”: REM ERASE MESSAGE 

80 NEXT : END 

100 REM POSITION CURSOR 

110 POKE 214,L : POKE 211 ,C : RETURN 


Example 3: 


One can use this method effectively for positioning the 
cursor for INPUTS. Only now, to allow forthe ’?’ and space 
printed by the INPUT statement, the cursor should be 
positioned 3 characters to the left of the actually desired 
position. 

100 LN$= “[CCCCCCCCCCCCCCCCCCCCCCCCCCCC 
CCCCCCCCC]” 

110 REM PRINT SCREEN HEADING 
120 PRINT “[CLR,SPACE10]ENTER PERSONAL 
DETAILS” 

130 PRINT LN$ 

140 REM POSITION TO 6TH LINE FOR MAIN INFO 
150 POKE 214,5: PRINT 
160 REM PRINT FIELD TITLES 
170 PRINT “NAME : ” ;A$( 1) 

180 PRINT “ADDRESS 1 : ”:A$(2) 

190 PRINT “ADDRESS 2 : ”;A$(3) 

200 PRINT “POSTCODE : ” ;A$(4) 

210 PRINT “PHONE : ” ;A$(5) 

220 REM RE-POSITION CURSOR FOR INPUTS 
230 POKE 214,5 : PRINT 

240 FOR 1=1 TO 5 : POKE 211,10 : INPUT A$(I) 

250 NEXT 

260 REM CHECK IF ALL CORRECT ON LINE 23 
270 POKE 214,22 : PRINT 

280 INPUT “ALL CORRECT[SPACE3]N[LEFT3]”;A$ 

290 IF A$<>“Y” THEN 130 : REM NO ? THEM TRY 

AGAIN 

300 END 

Notice how efficient this method is when you have to re¬ 
enter any fields. The cursor is repositioned to the 
beginning of the info on the screen. The field can be 
edited with the INST/DEL keys and (or) RETURN pressed 
to enter the correct field. 
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Example 4: 

Both the screen line and cursor positions can be 
PEEKed to see where one actually is on the screen so as 
to avoid scrolling the screen or other problems which will 
affect our nice screen format. For example, printing a long 
list of random numbers by ‘screenfull’ 

10 H$=“[CLR,SPACE10]EXAMPLE 1” 

20 LN$=“[CCCCCCCCCCCCCCCCCCCCCCCCCCCCCC 
CCCCCCCCC] 

30 GOSUB 130 
40 FOR N=1 TO 200 

45 REM CHECK IF CURSOR PAST LINE 19 
50 IF PEEK(214)>20 THEN GOSUB 100 
60 PRINT N, RND(l) 

70 NEXT : END 

100 REM POSITION CURSOR FOR MESSAGE 
110 POKE 214,22 : PRINT 

120 INPUT “PRESS RETURN FOR NEXT PAGE”;A$ 

130 REM PRINT SCREEN HEADING AND PAGE 
NUMBER 
140 P=P+1 

150 PRINT H$: PRINT LN$: PRINT “PAGE :”P: PRINTLNS 
160 PRINT “NO”,“RANDOM”: RETURN 

These examples cover the main applications but I’m 
sure you can thing of many more. One last one which I 
include in my programs is a routine I call ‘Idiots’ - a 
subroutine to print a message on line 22, only accept a ‘y’ 
or ‘n’ answer, then clears the line and returns from 
whence it came. (Can also include sound or colour 
changes to good effect.) It needs to have a string, for 
example SP$ set to be 39 spaces before it is used. It also 
turns the cursor flash on for the GET statement. This is 
done in location 204 (167 for 4000/8000 machines) but 
is a bit suspect for the VIC/C64S depending on the screen 
colours. 

10 SP$=“[SPACE39] 

. other lines of program eg 
20 GOTO 200 
50 REM IDIOTS 

55 REM POSITION MESSAGE, C FLASH ON 
60 POKE 214,22 : PRINT : PRINT M$: “ Y/N POKE 204,0 
70 GET AS: IF AS <>“Y” AND AS <> “N” THEN 70 
80 REM C FLASH OFF. RE POSITION AND CLEAR 
90 POKE204,1: POKE 214.22: PRINT: PRINTSPS: RETURN 

200 REM SET UP MESSAGE AND CALL IDIOTS 
210 M$=“IS IT REALLY COLD IN CANBERRA" 

220 GOSUB 50 

230 POKE 214,10 : PRINT 

240 IF A$=“N” THEN PRINT “I BET IT IS! 

(c) Greg Perry 1984, 

may be freely reproduced with acknowledgement. 


programs 

QUICKIES 

by Paul Blair 

1. TO RESTORE FROM NEW 


POKE205 1 ,0:SYS4229 1 Or 

POKE205l,0 then type in a line number of any non¬ 
existent line and press RETURN. Don’t try editing a re- 
NEWed program. Save it to cassette or disk, reset the 
computer, and reload the program before attempting 
anything along those lines. 


□ □ □ □ 

2. A NON-REM 


Did you know that the apostrophe can be used as a 
REM statement after GOTO or GOSUB? Try entering a 
line like 

2000 GOSUB 4999 ‘DISK ERROR 

with the appropriate lines at 4999 and prove it for 
yourself. 


□ □ □ □ 

3. SAVING MACHINE CODE 


So you’ve got 20 lines of DATA statements typed in, but 
don’t know how to make a direct loading binary file. Add 
two lines to the start of your program: 

10 OPEN 1,8,1 ,“NAME”: PRINT# 1 ,CHR$(L);:PRINT# 1 ,CHR$(H); 
20 FORT=STOF:READX: PRINT# 1,CHR$(X);: NEXT:CLOSEl: 
END 

This will work for cassette by changing “1,8,1 ” to “1,1,1 ” 
in line 10. The variables L and H are the low and high 
values of the program load address- e.g., a program to be 
stored at $C000 would have L=0, H=192. S and F are the 
addresses of the first and last byte to be saved. 


□ □ □ □ 

4. JUST FOR FUN 


On your C64, load a Basic program and type LIST, press 
RETURN. Now, POKE 22,35 and repeat the LIST. That’s 
unusual! Now I suppose you want them back. OK, cause a 
syntax error deliberately (type PRUNT and press 
RETURN will do). Ah, that’s better. For the same effect on 
the PET, poke 19,32. 
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Two for the 

VIC-20 

SOUND EFFECTS 

by Michael Spiteri 


5 REM **SOUND EFFECTS** 
10 S'1=36374:32=36875: S3= 
36876:S5=368?8:P0KES5,1 
0:34=36877 


15 PQKE36879,8: PRINT'X'Jj 
SOUND EFFECTS" 

20 PRINT"HI>SCALE l.":PR 
INT"2>SCALE 2." 

25 PRINT"3)BOMBS.":PRI NT 
"4>EXPLOSION." 

30 PRI NT"5>LASER.":PR INT 
"6>SIREN." 

35 PRINT"7)RED ALERT.":P 
RINT"8)LAHDING UFO." 

40 PR I NT " 9 > BIRDS. " : PR I NT 
"10)TELEPHONE." 

45 PRINT"11)UFO SHOOTING 
.":PR INT"HCHOOSE SOUND 
< 1 - 11 ):" 

50 INPUTS: IFSM1THEN50 
55 IFS=1THEN11Q 
60 IFS=2THEN125 
65 IFS=3THEN140 
70 IFS=4THEN155 
75 IFS=5THEN165 
80 IFS=6THEN1S0 
85 IFS=7THEN195 
90 IFS=8THEN210 
95 IFS=9THEN225 
100 IFS=10THEN240 
105 IFS=11THEN255 
110 FORI=250TO200STEP-2: 
P0KES3,1:FORM=1TO100: NE 
XTM,I:F ORI-205T O250STEP 
2:P0KES3,I 

115 FORM=1TO100:NEXTfl* I: 


P0KES3,O 
120 GOTO15 

125 FORI=250TO200STEP-2: 
P0KES3.I:FORM=1TO10: HEX 
TM,I:FORI=205TO250STEP2 
:POKES3»I 

130 FORH=1TO10:NEXTMjI:P 
0KES3 , 0 
135 GOTO15 

140 P0KES5,10:FORL=230TO 
128STEP-1:P0KES3, L: FORM 
= 1T020:NEXTM,L:P0KES3,0 
: P0KES4,200 

145 FORL=15TO0STEP-.0S:p 
0KES5, L: NEXTL:P0KES4,0 
150 GOTO15 

155 P0KES5,O:POKES4,220: 
FURL=15TO0STEP-1:P0KES5 

phk'pS5 M “ 1 JP 300! H E XTM,L ! 
r UKEr.<4,0: P0KES5,15 
lb0 GOTO15 

1^5 FORL=1TO30: FOR(1=250T 
O240STEP-l:P0KES3,M:HEX 


170 FORM=240TO250:P0KES3 
, M: NEXTM: POKES’., 0: NEXTL 
175 GOTO15 

180 FORL=1TO10:PQKES2, 20 
0:F0RM=1TO5O0:NEXTM:FOK 
ES2.O:POKES3,200:FORM*1 
TQ500:NEXTM 
185 P0KES3,0:NEXTL 
190 GOTO15 

19S F0RL=1TO10:FORM=1S0T 
0235STEP2:P0KES3, Ms FORM 
=1TO10:NEXTN«M:P0KES3.0 
200 FQRM= 1 TO 100 ’• HE XTM, L 
2Q5 GOTO15 

210 FORL=1TO20:FORM=220- 
LTO160-LSTEP-4:P0KES3,M 
:NEXTM 

215 FORM=160-LTO220-LSTE 
P4:P0KES3,M:NEXTM,L: POK 
ES3? O 

220 GOTO15 

225 FORL=1TO20SFORM=254T 
0240+1NT <RND<1>*10)STEP 
1:P0KES3,M:NEXTMs P0KES3, 
0 

230 F0RM=0T0INT<RND<1 )*1 
00>+120:NEXTM,L 
235 GOTO15 

240 FORL=1T05 • F0RM=1T050 
:P0KES3,220:FORN=1T05:H 
EXTN 

245 POKES?.,0:NEXTM sF0RM= 
1TO1500:NEXTM,L 
250 GOTO15 

255 FORL=1TO15sF0RM=200T 
O220+L#2sPOKES?<M:NEXTM 
. L.: POKES?? 0 
260 GOTO15 


DRAW POKER 


by Paul Elvery 

F7 = play cards 

SPACE BAR = shuffle cards 

1 - 5 = select cards. 

If you have trouble with the graphic 
characters try the function keys. 


O 0=36876:POKEO+2,15:T=R 
ND <-TI>:P0KE0+3,31: GOTO 
110 

1 ONN< J)G0T03,4,5,6,7 
9,10,11,12,13,14 

2 PRINT" "8T;BT;DT" "S 
■$" "BTjBTjBT;: RETURN 

.? PRINT" "DT" "ST" "BT 

;bt:bt;dt" "ST" "Bt;:re 

TURN 

4 PRINT" "ST" "BT;BTjDT" 
"ST" "BTjBTjDT" "ST" " 

;:RETURN 

5 PRINT" "DTtST" "STjB 
T;BT;BT;DT;ST" "STfBT;: 
RETURN 

6 PRINTST" "ST:Bf;BT? DT" 
"ST" "BT;BT;DT;ST" "ST 

5:RETURN 


40 


7 prihtst" "ST;bt;bt;dt; 
ST" "ST;BT;BTj DT;ST" "S 
T;:RETURN 

8 PRIHTST" "ST;DT" "ST" 

"BT;DT;ST" "ST;BT;BT;DT 
;ST" "ST;:RETURN 

9 PRINTST" "ST!DT" "ST" 
"BT:DT;ST" "ST;BT;DT" " 
ST" "DT;ST" "ST;:RETURN 

10 PRINTST" "ST:BT;DT;ST 

II IL c j 

"ST;BT;DT;ST" "St;:retu 
RN 

11 PRINTST" "ST;DT" "ST" 

" DT 5 ST " " ST-: BT-; DT; ST" 

"STSDT" "ST" "DT;ST" "S 
$;:RETURN 

12 PRINTST" "BT;DT" AS 

•"DT" ill! "DT" * "BT;DT 
" "ST;:RETURN 

13 PRINTST" "BT;DT" 

, "DT " a ■ ,* " DT" • * "BT; DT 
" "ST5:RETURN 

14 PRINTST" "BT; DT"a I ■ 

• "DT"H1‘. "DT" • *"BT;D$ 
" "ST;:RETURN 

110 T=0: PRINT"l : l'i r->" 

TAB<16>" f -•, BET | I 

CREDIT | I J "TA 

B<60>" ^ 

112 PRINT"” i- 1 - 1 -r 

_^_ II 

114 F0RI=1T09 

116 print" i mm i mm «11 
m WPI":NEXT 
118 PRINT’"-'- J - u - 

' _i" 

120 PR INT"LSPOVAL"TAB <11 
> "FLIISH" : PRINT"H3 FLSH" 
TAB<11)"STRAIGHT" 

122 PRINT"H4 KIND"TAB<11 
)"3 KIND":PRINT"HFULL H 
"TAB<11)"TWO PAIR" 

124 PRINT"33" 

130 DIM CX<53),HX<5),N<5 
) , F'<8) , S<5) 

140 P<0)=1:P<1)=2:P<2)=3 
:p<3)=4:P<4)=5:P<5)=7:P 
<6)=25:P <7)=50:P < 8)=250 
150 B=0:GOSUB800 
160 GETAT:IFAT="H"ANDB<5 
THENB=B+1:T=T-1:POKED,2 
20:G0SUB810:POKED,0 
170 IFATO" "0RB=0THEN16 
0 

200 R=52:FOR1=1 TOR:CX<I) 
=I:NEXT 

220 FORJ=1TO5:GOSUB7Q0:H 
X < J)=D:GOSUB770:NEXT:PR 
I NT 

270 GETAT:IFAT=" "THEN32 
0 

289 IFAT-< "O"ORAT->"5"THEN 
''270 

290 A=ASC<AT)-48:IFA=OTH 
*"EH310 

30© HX < A) = 1:PRINTTAB < 4*A 

2) : GOTO270 

7 ,10 FQR,T= 1 TO5: HX < J ) =0: HE 
XT:PRINT" 

”":G0T0270 
32D FORJ=1T05 
33D IFHX(J >=DTHENGOSUB90 
0 

340 NEXT 
350 F0RJ=1T05 
360 IFHX<,T)=0THENGOSUB70 
0:QOSUB770 

Continued on page 58 
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Publications, sofware and hardware 

INSIDE COMMODORE DOS 

My first introduction to the work of Disk 
Immers was a DISK UTILITY PACK that he 
produced for the Commodore 4040 dual 
disk drive. I was told that it was his work on 
deciphering the disk operating system, 
and his subsequent production of many 
extremely useful disk utilities that gained 
him his PhD, but that may or may not be 
true. His latest opus, produced in co¬ 
operation with another PhD, Gerald 
Neufeld, has been no less diligently 
researched and written. It is probably the 
best book written about the 1541 disk 
drive for all levels of disk user who want to 
know more. 

Before you start to read, you will notice 
the very tidy layout of each page, and the 
crystal-clear computer hardcopy used in 
the text. No grey ghosts there! 

The first four chapters will lead even the 
most rank beginners to a working 
knowledge of how the 1541 works, 
including hints and cautions that may save 
the life of a disk or two. Then, if you want to 
go further, direct access programming is 
explained, so that you may enter what Dick 
calls the ‘netherworld’ of using the 1541 to 
its quite considerable limits. 

Then it’s into the murky world of software 
protection. Aha! The terror of an Error 20 or 
the puzzle of formatting a disk with 
multiple ID’s will have you burning the 
midnight! If you get into trouble, read 
“Getting Out of Trouble”. What a consid¬ 
erate book. 

The laterchaptersgiveafull run-down on 
many other aspects of the 1541 DOS. The 
explanation of inbuilt routines is very 
professional, better than anything else 
currently offering. 

A disk containing all the programs in the 
book, plus as many again that aren’t, is 
offered to complement the tome. Grab it. 

The book has just been released in the 
USA, and my copy comes courtesy of Disk 
Immers. Cover price is US$19.95, with 
US$15.95 for the disk The publisher is 
DATAMOST, 20660 Nordhoff Street, Chat- 
sworth, California, 91311. If you want to 
phone them, try 818-709-1202. With ISD, 
first ring 00111, then the number above. 

Given the speed with which books are 
reaching our shores, a local distributor 
should appear soon. Keep an eye out, and 
we’ll do the same and let you know. 

Review: PAUL BLAIR 


VIDEOS ON COMPUTERS 


Every now and then something new 
comes into our letter box. Recently two 
VHS Video tapes arrived for review from 
Auska Videobooks. The tapes were 
entitled “Master Class Commodore VIC 20 
Level 2” and “Master Class Commodore 
64 - Introduction to Computing.” 


The concept of videos produced by and 
on computers have attracted me for 
sometime and I was busting my boiler to 
get to a VCR to view them. 

Each tape had programs on their sound 
track that you could copy off onto cassette 
and load into your computer. These 
programs formed the bases of the tutorials. 

Introduction to Programming 


This tape was split into three sections 

Firstly it discussed the part of the 
computer, what memory was, how we input 
and output information and assigning 
values to variables. 

Second session dealt with colour codes 
on the keyboard, expanding print state¬ 
ments to include colours and clearing the 
screen and cursor controls. 

Third session covered using character 
string variables, defining arrays of vari¬ 
ables and using a loop to process all 
elements of an array. 

VIC 20 Level 2 


This tape was split into two sessions. 

The first deals with the writing of a simple 
adventure program using text, upper and 
lower case and the use of colours and 
random numbers. This section included a 
program to lift off the tape and run. 

Second session covered the program¬ 
ming of the VIC 20 using the micro’s 
internal functions and shows the user how 
to use the micro’s memory, generate 
colour, coding effect and animation. 

Comment 


These tapes are professionally pack¬ 
aged and presented. They were written by 
a leading programmer, David Redclift, 
(presumably British). While the manufact¬ 
urers of this series may have employed a 
leading programmer they definitely did not 
match him with a ‘leading’ Audio Visual 
producer. Unfortunately while the content 
seemed good the background voice was 
monotonous to the point of distraction and 
the length of time that each listing was on 
the screen was longer than one could 
expect any concentration span to last. 
Here was a beautiful chance to develop a 
total new medium but it had the 
appearance of a 1955 Education Depart¬ 
ment 16mm monologue. 

I suggest that if you are interested in 
these videos that you evaluate them for 
yourself. Content is good and my criticism 
of production is very subjective. 


Competitions 

As usual, my mail bag is just 
overflowwing with entries for our 
competitions! Well, if people don’t like 
my competitions, we will also give 
prizes for anyone who comes up with 
a better one! Send us details of any 
interesting little problems or useful 
tips you have come up with. 


COMPETITION 1. 


The most interesting ONE LINE 
program. This may be a sound, 
graphics or other useful (?) routine. A 
one line game perhaps? 

There are only two conditions. 

a) The routine must provide a 
continually changing output. 

b) It must be able to be typed in 
directly from the keyboard. But, you 
may use as many abbreviations of the 
BASIC keywords as you can fit in 80 
characters - two 40 column screen 
lines or four on the VIC. 


COMPETITION 2 


The best computer solution to a set 
problem, or a good problem (which 
can be solved more easily by 
computer than by hand), with which 
we can tempt our readers. 

It’s good to hear that there are still a 
number of CBM users out there and 
this months winner is Bill Sands from 
Lane Cove with the following interest¬ 
ing maths routine for a CBM 4032. 

1 X=PEEK( 143): Y=PEEK( 142): PRINT X“+”Y“=”;: 

INPUT Z:A$(0)=“NO”:AS( 1 )=“YES”: 

PRINT A$(-<X+Y=Z)): GOTO 1 

Remember, you MUST leave out 
ALL spaces and abbreviate most of 
the BASIC keywords to fit it all on one 
line. Use pE for PEEK, ? for PR I NT, and 
gO for GOTO. Don’t abbreviate IN PUT 
to iN since this means INPUT#. 

Memory locations 142 and 143 are 
from the Tl jiffy clock and these 
change continually. C64 and VIC 
users, change 142, 143 to 161 and 
162. Think about how it works, quite 
cunning isn’t it? 

Regards, Greg Perry 
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-LOCr .frC.FAGE 000i 


LINE# 

LOC 

CODE 


-INE 

00001 

O0O0 





00002 

0000 




• FU7"0 C LOC S’ . 3FC " 

00003 

0000 




• ♦ V + rtlt-r + ttViiii ii 

00004 

0000 




f DISPLAY C64 T 

00005 

0006 




• f IN 12HF AM. 'FM 

00006 

0000 




• * AND CHEO PDF 

00007 

0000 




f 

00008 

0000 




i •*: > GREG r EF F 

0000? 

0000 





0001O 

00O0 





0001 1 

0000 




•INTERNAL LABELS. SYI 

00012 

0000 




SCFEEN=T0400 

GOO 1 3 

0000 




I OLPAM=f DS0C« 

O0014 

0000 




BOPDEF =iD020 

00015 

0000 




TEMS=J’D*‘0. c . 

00016 

0000 




SECS=TENS+1 

00017 

O00O 




MINS=TENS^2 

0O01S 

0000 




HF'S=TENS+ 3 

000 1 9 

000O 




FAL=TDC0E 

00020 

000O 




ICR=fDCOD 

00021 

00O0 




hIFO=I0314 

O0022 

0OO0 




IP0=TEA31 

00O2:. 

0000 




TEMF=TA6 

O0024 

0000 




AFLAG=402 

00O25 

0000 





00O26 

0O0O 




♦-T033C 

00027 

0330 





00O28 

033C 




•SET NEW INTEFFUFT 

OO029 

03 3C 

78 



SETIFC SEI 

0O030 

033D 

A9 

53 


LDA # STAF7 

00031 

033F 

SD 

14 

CO 

STA HIFO 

O0032 

0342 

A? 

03 


LDA #. S~AFT 

O0033 

0344 

SD 

» <r 

03 

STA H1R0+1 

O0O34 

0347 

AD 

OE 

DC 

LDA FAL 

0O035 

034A 

09 

•SO 


OFA #T8G 

00036 

034C 

•SD 

0E 

DC 

STA PAL 

00037 

034F 

A9 

03 


-DA # TENS 

O0038 

0351 

85 

A 6 


STA TEMP 

O0039 

0353 

A9 

DC 


LDA #: TENS 

O0040 

0355 

35 

A7 


STA TEMP+1 

00041 

0357 

58 



ILI 

OO042 

0358 

60 



pJC 

00O43 

035? 





0O044 

0359 




DISPLAY TOD CLOCf 

©0045 

0359 

A2 

00 


staft ld: : #00 

O0046 

035B 

AO 

03 


LDY tit 03 

00047 

035D 

A? 

50 


_DA # F 

00048 

035F 

2C 

OB 

DC 

BIT HP'S 

OO049 

0362 

30 

02 


SMI CONTI 

00050 

0364 

A9 

41 


LDA # A 

00051 

0366 

20 

B3 

03 

coHTi ;sf fpints 

00052 

0369 

A9 

4D 


LDA # M 

00053 

036E 

2'0 

B'S 

03 

TSF PRINTS 

00O54 

036E 

E8 



IN.” 

O0055 

036F 

El 

Ac- 


-DA • TEMF •. Y 

O0056 

0371 

48 



FHA 

08057 

0372 

29 

70 


AND #:i011100( 

00058 

0374 

20 

AD 

03 

JSF FFINTl 

00O59 

0377 

68 



FLA 

00O60 

0378 

29 

OF 


AND #.*.'0000111 

0006 1 

037A 

20 

B1 

03 

JSF. FRINT2 

0O062 

037D 

38 



DEV 

00O63 

037E 

H9 

2D 


C0NT2 LDA # - 

00O64 

038O 

20 

B3 

03 

JSR PRINTS 

00O65 

0383 

B1 

A6 


-DA -TEMF•.V 

O0O66 

0385 

48 



FHA 


ML listing for 
24HR TIMER & ALARM 


CONTINUED FROM Vol 4 No. 3 


193 4 


START OF •: in T JI: C_0Cf 


IMTERFUP7 VEC TOF 
>‘4 I'nLRFUf T F OUT I NE 


FLAG T 
:7AFT 


) IE 7 
> X!T I Mi 


ALARM FINOS 


nr INTEFFUF7 f 
r'JT r.EN IRQ ADDFESI 

• in ifc ;ectcf 


Hi iSURE PAL Funo 
SIT T IS SET 
-TOPE IT 
-LT L'F INDIRECT 
FOImTEF t: 7 .id 


RETURN 7. 


O0O67 

O0O6S 

0006? 

00070 

00071 

00072 

00073 

00074 

00075 

0O076 

0O077 

00078 

00079 

00080 

00081 

O00S2 

00083 

00084 

00085 

00086 

00087 

00088 

O0089 

00090 

00091 

00092 

00093 

O0094 

0O095 

O0096 

00O97 

00098 


0386 
038? 
0380 
038C 
038F 
039G 
0392 
0394 
0397 
039? 
0399 
039C 
039C 
0390 
039F 
03A1 
03R3 
03R5 
0307 
0300 
030H 
O30D 
030E 
030F 
O3B0 
03B1 
03B3 
03B6 
03B8 
03BB 
03BC 
03 BD 


20 AD 03 
68 

2? OF 
20 £1 03 
88 

DO EC 
0? 2E 
30 B3 03 
B1 06 

20 £1 03 


HD OB DC 
29 04 
FO nr 
09 86 
35 02 
6D 20 SO 
4C 31 E0 

40 

40 

40 

40 

0? 30 
9D OO 04 
09 OO 
?D 00 D : - 
E8 
60 


JSR FFINTl 
FLA 

AND #*100001 111 
JSR FRINT2 
DEV 

BNE CON72 
LDA # . 

JSF print: 

LDA TENF-.Y 
JSR PPIHT2 


STARTING COLUMN FOP FF1NI 
•OFFSET FOI.iTEF T, CIA 
TINE IS Ft-; 

IF BIT 7 OF *£7 
y E:- IT IS 

Nu IT S AlT.'AuL> an 


- 2 AYE r.:7P A Si ACL 

set ::d Hi-3 

•SAVE READIr 10 

• left hifble only less am. fm 

RECOVER READING 
RIGHT NIBBLE ONLY 

•PREPARE FOR NEXT TOD READ 


•READ TOD 
SAVE READING 
PRINT TENS 
REC OVER' READ I NO 
RIGHT NIBBLE ONLY 

FFEF0PE for ne::t tod read 
REPEAT IP HOT FINISHED 


READ l. lu THS 
• AND #::O0001111 


HEO IF ALARM CAUSED INTERRUPT 


ALARM LDA ICR 
AND tt$Q4 
BEO DONE 
LDA #T86 
STA AFLAC 
STA BORDER 
DONE JMP IRQ 

FFINTl LSF 0 
-SF, A 
LSR A 
L5R 0 

FFINTl ORA #430 
PRINT3 STA SCREEN. 
LDA #40O 
STA COLRAM 
I NX 
FTS 
. END 


CHECl IF ALARM CAUSED INTERRUPT 
RINGS A B-ELL 
NOPE 

BLUE FLUS -7E FLAG 
SET ALARM FLAG 
SET BORDER COLOUR 
CONTINUE NORMAL INTERRUPT 

•CONVERT HIGH NIBBLE 
•HE:: BYTE 70 LON NIBBLE 
BY DIVIDING BY 8 

CONVERT TO ASCII NUMBER 
6iORE ON SCREEN 


set to ne::t column 


ERRORS - 0000O 


SYMBOL TABLE 

SYMBOL VALUE 
AFLAC* 0002 

CONTI 0 36.6 

HRS DCOB 


SYMBOL TABLE 
IVMBGL VALUE 


ALARM 

CONTI 

ICR 


G37E 
DC OD 



FAL 

DC OE 

PRINT 1 

03 AD 


3CPEEN 

0400 

SECS 

DC 09 


TEMF 

O0A6 

TENS 

DC OS 

© 

end of as 

SEMBLV 




BORDER 

DONE 

IFO 


FFINT2 
SETIPO 


D02O 
OS A A 
£ A}. 1 


O SB i 

O 3 SC 


V'LFAM 

HIRO 

MINS 


FFINT 3 
STAR T 


DG0U 

0 :• 14 

I".' On 


O.B: 


AO 
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BASAD FOR THE 64 


PROJECT 2. 


by Paul Blair 

Now that we have an effective monitor program for our 
Commodore 64’s, MONAD (Commodore Magazine, Vol 4, 
Issues 2 and 3), it’s time to look at some additional useful 
extensions for use within the environment of our BASIC 
language. 

If you are familiar with the Commodore computing 
world, skip over this next bit. It’s just to set some 
background to the program that follows. 

Commodore computers have used some different 
versions of BASIC. Basic 2.0 was used for afew years, and 
more recent pre-C64 Commodore computers used an 
upgraded Basic, Basic 4.0. The great leap forward in 
Basic 4.0 was a series of commands described as “Disk 
Basic”. This simplified disk access, and facilitated use of 
relative files. Most of the facilities were actually in Basic 
2.0 and Disk Operating System (DOS) 2, but they require 
clumsy syntax to use. Maybe some day Commodore will 
tell us why. 


To give an example: to read the directory of a disk, Basic 
2.0 requires LOAD“$”,8 then LIST. Your program in 
memory will be erased when this syntax is used. 


In Basic 4.0, you simply type CATALOG or DIRECTORY 
and the directory goes straight to the screen without 
disturbing your program. If you are familiar with the 
WEDGE or DOS SUPPORT program, then Basic 4.0 gives 
you all that (and more) without the hassle of loading in a 
program every time the computer was powered on. 

Commodore Magazine now brings you BASAD, the 
second of our specially written major utility programs. 
BASAD gives disk users the joy of many Basic 4.0 disk 
oriented commands, plus some additional features to 
make your programming more enjoyable. It also includes 
a special disk handling section so that you may access 
disk sectors directly for review and modification! 


Here is a short form description of the new BASAD 
commands: 


AUTO 

OLD 

PAGE 

SETPAGE 

COLLECT 

HEADER NEW 

RENAME 

SCRATCH 

UNSCRATCH 

COPY 

DVERIFY 

DLOAD 

DSAVE 

DS$ 

BLOAD 

BSAVE 

BXLOAD 

PROTECT 

RELEASE 

SEND 

DISK 

KILL 


automatic line numbering 

recover from NEW 

review a pageful of your program 

set parameters for PAGE 

validate a disk 

an unformatted disk 

rename a program on disk 

erase a file on disk 

recover a SCRATCHed file 

copy a file 

verify a saved program on disk 
load a program from disk 
save a program to disk 
read the disk error channel 
load a binary file from disk 
save a binary file to disk 
load a binary file from disk 
to a specific address 
to protect a disk file against erasure 
to un-PROTECT a disk file 
to send any DOS disk command 
to read/write any disk sector 
and home to tea 


That should whet your appetite! The full program 
follows in Basic loader format. I have used a formatted 
program this time to guard against errors (mine and 
yours!) following a suggestion from David Balean. Our 
special disk service will again be available if you feel the 
task is too daunting. 

Take your time and type the program in easy stages. A 
checksum section has been included to help you check 
your accuracy. Each “block” of 512 bytes has a 
checksum, and that is probably a convenient way to split 
the work. 

Use the screen editor to enter Lines 1127 to 1141 - it 
will save you a lot of work. 

When you finish a section, SAVE it to disk before trying 
any tricks. When it’s all done, RUN 1007 for a final check. 
Then, to save loading time later on, make a binary file 
using BASAD to save itself. TypeSYS49152 <RETURN> 
and the opening screen should appear. Then, use: 

BSAVE"BASAD.A.BIN”,49152,53248 <RETURN> 

and you will have a reloadable binary file on disk. 
Next issue we will bring you a full instruction set, so 
watch out for it. 

Parts of the program were written by Thomas Wysocki, 
and are used herewith his permission, and that of the Pet 
Benelux Exchange. Our thanks to them. 

1000 REM:BASAD.A BASIC LOADER 

1001 REM:L0CATI0N $C000 

1002 : 

1003 PR1NTCHR$(147):PRINT'L0ADIN6....":SR=49152:FH=53247:G0T01028 

1004 : 

1005 REM:CHECKSUMS=RUN1007 

1006 : 

1007 SR=49152:FORI=SRTOSR+511:READA:P1=P1+A:NEXT 

1008 FORI=SR+512TOSR+1023:READA:P2=P2+A:NEXT 

1009 FORI=SR+1024TOSR+1535:READA:P3=P3+A:NEXT 

1010 F0RI=SR+1536T0SR+2047:READA:P4=P4+A:NEXT 

1011 FORI=SR+2048TOSR+2559:READA:P5=P5+A:NEXT 

1012 F0RI=SR+2560T0SR+3071:REA0A:P6=P6+A:NEXT 

1013 FORI=SR+3072TOSR+3583:READA:P7=P7+A:NEXT 

1014 FORI=SR+3584TOSR+4095:READA:P8=P8+A:NEXT 

1015 IFP1 <>62436THENX=1:G0T01024 

1016 IFP2O60287THENX=2:G0T01024 

1017 IFP3<>62970THENX=3:G0T01024 

1018 IFP4O74135THENX=4:G0T01024 

1019 IFP5O68955THENX=5:G0T01024 

1020 IFP6061076THENX=6:GOT01024 

1021 IFP7O65339THENX=7:G0T01024 

1022 IFP8<>50999THENX=8:G0T01024 

1023 PRINT"DATA CHECKS 0K":END 

1024 PRINT'DATA ERROR IN BLOCK'XEND 

1025 : 

1026 REM:L0ADER PROGRAM 

1027 : 

1028 F0RY=SRT0FH:READA:P0KEY,A:NEXT 

1029 PRINT'SYS "SR'TO ACTIVATE BASAD A” 

1030 NEW 
1031: 

1032 DATA 169,111,160.192,141, 4. 3.140, 5. 3,169, 23,160,193,141, 6 

1033 DATA 3,140. 7. 3,120,169.148,141, 20. 3,169,200,141, 21. 3. 88 

1034 DATA 169, 80.160.193,141. 8, 3,140, 9. 3,169, 10.133,252,169. 0 

1035 DATA 141.241,207.141,242.207,169. 15,141, 33,208.141. 32,208,169.220 

1036 DATA 160.206, 32, 30.171,160.255,200.192. 64.208, 3. 32.138.195,185 

1037 DATA 126.194, 48 7,240. 15, 32.210,255.208,236, 41,127, 32,210,255 

1038 DATA 32.135.195.208.226. 32.138.195.169. 10.133,251.133.252! 96.166 

1039 DATA 122.160, 4.132, 15.189. 0. 2. 16. 7,201.255.240. 74.232.208 

1040 DATA 244,201 32.240. 67.133. 8.201. 34,240 98 36 15 112 57 201 

1041 DATA 63.208. 4,169,153.208. 49.201. 48.144 4 201 60 144 41 132 

1042 DATA 113.160. 0,132. 11.134.122.169.127 133.100 169 193^133^ 101 208 
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1043 DATA 7,232,230,100,208, 2,230,101,189, 0, 2, 56,241,100,240,241 

1044 DATA 201,128,208, 48, 5, 11.164,113,232,200,153,251, 1,185,251, 1 

1045 DATA 240, 59, 56,233, 58,240, 4,201, 73,208, 2,133, 15, 56,233, 85 

1046 DATA 208,147,133, 8,189, 0, 2,240,223,197, 8,240,219,200,153,251 

1047 DATA 1,232,208,240,166,122,230, 11,177,100, 8,230,100,208, 2,230 

1048 DATA 101, 40, 16,244,177,100,208,176,189, 0, 2, 16,185,153,253, 1 

1049 DATA 198,123,169,255,133,122, 96, 48, 3, 76,243,166,201,255,240,249 

1050 DATA 36, 15, 48,245,170,132, 73,160,127,132,100,160,193,132,101,160 

1051 DATA 0, 10,240, 16,202, 16, 12,230,100,208, 2,230,101,177,100, 16 

1052 DATA 246, 48,241,200,177,100, 48, 5, 32, 71,171,208,246, 76,239,166 

1053 DATA 32,115, 0, 32, 89,193, 76,174,167,240, 35,233,128,144, 28,201 

1054 DATA 35,144, 18, 56,233, 76,144, 16, 10,168,185,254,194, 72,185,253 

1055 DATA 194, 72, 76,115, 0, 76,247,167, 76, 8,175, 76,165,169, 96, 69 

1056 DATA 78,196, 70, 79,210, 78. 69, 88,212, 68 , 65, 84,193, 73, 78, 80 

1057 DATA 85, 84,163, 73, 78, 80, 85,212, 68 , 73,205, 82, 69, 65,196, 76 

1058 DATA 69,212, 71, 79, 84,207, 82, 85,206, 73,198, 82, 69, 83, 84, 79 

1059 DATA 82,197, 71, 79, 83, 85,194, 82, 69, 84, 85, 82,206, 82, 69,205 

1060 DATA 83, 84, 79,208, 79,206, 87, 65, 73,212, 76, 79, 65,196, 83, 65 

1061 DATA 86,197, 86 , 69, 82, 73, 70,217, 68 , 69,198, 80, 79, 75,197, 80 

1062 DATA 82, 73, 78, 84,163, 80, 82, 73, 78,212, 67, 79, 78,212, 76, 73 

1063 DATA 83,212, 67, 76,210, 67, 77,196. 83, 89,211, 79, 80, 69,206, 67 

1064 DATA 76, 79, 83,197, 71, 69,212, 78, 69,215, 84, 65, 66,168, 84,207 

1065 DATA 70,206, 83, 80, 67,168, 84, 72, 69,206, 78, 79,212, 83, 84, 69 

1066 DATA 208,171,173,170,175,222, 65, 78,196, 79,210,190,189,188, 83, 71 

1067 DATA 206, 73, 78,212, 65, 66,211, 85, 83,210, 70, 82,197, 80, 79,211 

1068 DATA 83, 81,210, 82, 78,196, 76, 79,199, 69, 88,208, 67, 79,211, 83 

1069 DATA 73,206, 84, 65,206, 65, 84,206, 80, 69, 69,203, 76, 69,206, 83 

1070 DATA 84, 82,164, 86 , 65,204, 65, 83,195, 67, 72, 82,164, 76, 69, 70 

1071 DATA 84,164, 82, 73, 71, 72, 84,164, 77, 73, 68,164, 71,207, 68 , 73 

1072 DATA 83,203, 67, 79, 76, 76. 69, 67,212, 75. 73, 76,204, 83, 69, 78 

1073 DATA 196, 79, 76,196, 80, 65, 71,197, 83, 69, 84, 80, 65, 71,197, 65 

1074 DATA 85, 84,207, 67, 65, 84, 65, 76, 79,199, 68 , 83,164, 68 , 76, 79 

1075 DATA 65,196, 68 , 86 , 69, 82, 73, 70,217, 66 , 76, 79, 65,196, 66 , 88 

1076 DATA 76, 79, 65,196, 68 , 83, 65, 86,197, 66 , 83, 65, 86,197, 80, 82 

1077 DATA 79, 84, 69, 67,212, 82, 69, 76, 69, 65, 83,197, 67, 79, 80,217 

1078 DATA 83, 67. 82, 65, 84, 67,200, 72, 69, 65, 68 , 69,210, 82, 69, 78 

1079 DATA 65, 77,197, 85, 78, 83, 67, 82, 65, 84, 67,200, 0, 42,195, 13 

1080 DATA 199, 28,199, 69,199.120,199,182,199, 18,200, 24,200,169,200,113 

1081 DATA 202,212,202, 30,203, 84,203, 99,203,153,203,185,203,237,204, 46 

1082 DATA 205, 64,205, 79,206,155,206,178,206,201,206,169, 71,160,197, 32 

1083 DATA 30,171,162, 13,169, 62, 32, 21,196,169, 0,141, 1 , 2 , 32, 93 

1084 DATA 196,201, 62,240,249,201, 32,240,245,162, 5,221,143,195,208, 12 

1085 DATA 142, 0, 2,189,149,195, 72,189,155,195, 72, 96,202, 16,236, 76 

1086 DATA 50,195,133,151, 32,135,195,185,235,197, 32, 6,196,200,208, 3 

1087 DATA 238, 1 , 2,198,151,208,237, 96, 32, 40,196,144, 3,153,235,197 

1088 DATA 200,198,151. 96,169,147, 44,169, 32, 44,169, 13, 76,210,255, 58 

1089 DATA 87, 82, 77, 64, 88,195,196,196,195,196,227,234,162,162,160,104 

1090 DATA 122,160, 0,140, 3, 2,136,140, 4 , 2, 32,207,255,201, 13,240 

1091 DATA 23, 32, 40,196,144, 18,141, 3, 2, 32,207,255,201, 13,240, 8 

1092 DATA 32, 40,196,144, 3,141, 4 , 2,172, 3, 2, 32,225,255,240, 24 

1093 DATA 32,209,197, 32,225,197,152, 32, 6,196, 32,135,195,169, 8 , 32 

1094 DATA 98.195, 32,162,197, 76,203,195, 76, 50,195, 32, 40,196,144,248 

1095 DATA 168,169, 8,133,151, 32, 93,196, 32. 93,196, 32,120,195,208,248 

1096 DATA 32,162,197, 76. 50,195, 72, 74, 74 , 74, 74, 32, 30,196,170,104 

1097 DATA 41, 15, 32, 30,196, 72,138, 32,210,255,104, 76,210,255, 24,105 

1098 DATA 246,144, 2,105, 6,105, 58, 96,169, 0,141, 2, 2, 32. 93,196 

1099 DATA 201, 32,208, 9, 32, 93,196,201, 32.208, 15, 24, 96, 32, 82,196 

1100 DATA 10, 10, 10, 10,141, 2, 2, 32, 93,196, 32, 82,196, 13, 2, 2 

1101 DATA 56, 96,201, 58, 8 , 41, 15, 40,144, 2,105, 8 , 96, 32,207,255 

1102 DATA 201, 13,208,248,104,104, 76, 50,195, 32,207,255,201, 13,208, 6 

1103 DATA 32,114,202. 76, 50,195,201, 36,240, 32, 72,169. 8,133,186, 32 

1104 DATA 177,255,169,111,133,185, 32,147,255,104, 32,168,255, 32,207,255 

1105 DATA 201, 13,208,246, 32,174,255, 76, 50,195, 32,176,200, 32,204,255 

1106 DATA 76, 50,195, 32, 93,196, 32, 40,196,144,239,141, 57,197, 32, 93 

1107 DATA 196, 32, 40,196,144,228,141, 60,197, 32,103,197,173, 0, 2,201 

1108 DATA 1,240, 30,169, 49, 32,255,196,162, 13, 32,198,255,162, 0, 32 

1109 DATA 207,255,157,235,197,232,208,247, 32,204,255, 32,139,197, 76, 50 

1110 DATA 195, 32, 82,197,162, 13, 32,201,255,162, 0,189,235,197, 32,210 

1 11 DATA 255,232,208,247. 32,204,255,169, 50, 32,255,196, 76,219.196,141 

1 2 ha TA 50 ’ 197 ' 162 - 15 - 17 3. 57.197, 32,149,197,142, 57,197,141, 58,197 

1114 nAT A 173 ’ 6 °’ 197, 32 - 149 - 197 - 142 - 60,197,141, 61,197,162. 15, 32,201 

me °ata ?^' 162, °’ 189 ’ 49 ’ 197< 32,210,255,232,224, 13,208,245. 76,204 i 

1116 nATA on 85 ’ 49 ' 58, 49, 51> 32 - 48 - 32 - 48 - 40 . 32, 48 - 48 - 66 , 45 

1117 DATA 8 n QC 49, 51, 32 ' 48 ’ 35 ' 13 - 68 - 73 - 83. 75, 65, 68 , 46, 65 

1118 DATA 79A ^ono' 15 ' 32 - 201 - 255 - 162 - 0.189. 62,197, 32,210,255,232 

1119 DATA o qo !!o!c 76 . 204 .255,169, 15,168,162, 8 , 32,186,255,169 

1120 DATA I K, ’ 1 • ’ 32,192,255,169. 13,168,162, 8 , 32,186,255,169 

1121 DATA 169’ 15 7 fi «III 32,189,255 ' 76,192,255,169, 13, 32,195,255 

1122 DATA 58 96 152 48 ' 56 ' 233, 10 ’ 144 ’ 3,232,176,249.105 

1123 DATA 8 185 235 iqy^'iov 168, 32 ’ 135195 - 169 - 18. 32,210,255,162 

8,185,235,197, 41,127,201. 32.176. 4,169. 46,208, 3,185,235 

1124 DATA 197, 32,210,255,169, 0,133,212,200,202,208,229,169,146, 76,210 

1125 DATA 255,173, 1, 2,208, 6,204, 4, 2,176, 1, 96,104,104, 76, 50 

1126 DATA 195, 32,138,195,169, 58,162, 62, 76, 21,196, 0,170,170,170,170 

1127 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1128 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1129 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1130 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1131 DATA 170,170,170,170,170,170.170,170,170,170,170,170.170,170,170,170 

1132 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170.170 

1133 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1134 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1135 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1136 DATA 170,170,170,170,170.170,170,170,170,170,170,170,170,170,170,170 

1137 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1138 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1139 DATA 170,170,170,170,170,170,170,170,170,170,170,170.170,170,170,170 

1140 DATA 170,170,170,170,170,170,170,170,170,170,170,170,170,170,170,170 

1141 DATA 170,170,170.170,170,170,170,170,170,170,170,170,170,170,170,170 

1142 DATA 170,170,170,170,170,170,170,170,170,170,170,169, 8,133,186, 32 

1143 DATA 177,255,169,111,133,185, 32,147,255,169, 0,133,151,164,151,177 

1144 DATA 187, 32,168,255,230,151,198.183,208,243, 32,174,255, 96.169. 81 

1145 DATA 133,187,169,197,133,188,169, 2,133,183, 76,235,198,169,124,160 

1146 DATA 165,141, 4, 3,140, 5, 3,169, 26,160,167,141, 6, 3,140, 7 

1147 DATA 3,169,228,160,167,141, 8, 3,140, 9, 3,169, 49,160,234,141 

1148 DATA 20, 3,140, 21, 3, 96, 32,115, 0,165,122,133,187,165,123,133 

1149 DATA 188,169, 0,133,183, 32,140,203,230,183,201, 34,240, 3, 76, 85 

11c? UaI« l? 9 ' 32,115, °' 76,235,198,160, 0,132,151,164,151,177,187, 32 
1151 DATA 210,255,230,151,198,183,208,243, 96,165, 43,164, 44,133, 87,132 
11?? 88,160 ' 3.200,177, 87,208,251,200,152, 24,101, 87,160, 0,145 

83 ??!? 43,165, 88 ' 1 05, 0,200,145, 43,136,162, 3,230, 87,208, 2,230 

« 88 ' 177 ' 87 ’ 208 '244,202,208,243,165, 87,105, 2,133, 45,165, 88 

« ??’ °’ 133 ' 46, 76 ' 123 .227,144, 13,240, 11,201.171.240, 29,201 

?? I?' 240 ' 6 ’ 76, 80 ' 203 ' 3 2.107,169, 32, 19,166,165.251. 24.101 

lien 2 °' 169, °' 101 - 21 ’ 133 ' 21 ■ 76, 2,200,165. 21, 72,165 

11cq UiTA 2 ’ 165, 20, 36,229,251,133, 20,165, 21,233, 0,133 

iiRn nHHl ,?I' 2 ??' 208 ' 240, 32 ‘ 1 9.166,104, 56,229,251,133, 20,104,233, 0 

, n* 7 * ??' ? 1, 69 ' 80.141,119, 2,169,193,141,120, 2,169, 2,133,198 

R? nAT4 lie 2 ?!' 1 ??' 32 ' 158 . 1 83.134.251. 96,176, 20, 32,235,183,134,252 
iiri nATA ??',??' 86,229 - 252 .1 4 1,241,207,165, 21,233, 0,141,242,207,169 

1164 DATA onn 14 ?' 3 ' 169 .200,141, 3, 3, 76, 69,200,166, 11,224, 5 

1165 DATA mins' 78 ' 118 ’ 200 .173.241,207, 24,101,252,141,241,207,173.242 

1166 nATA 565 8,141,242 . 207 .174,241,207, 32,205,189,169, 32, 32.210 

1167 DATA n 1 r! 5 i i 1 ? 7,209,153,119 . 2,230,198,200.196,211,208,244,169 

1168 DATA 17?'???'?!!’ 7 6 - 131 - 1 64,169.131,141, 2, 3,169,164,141, 3, 3 

1169 DATA 567' 7 !'???’ ^ 6 - 229 - 252 . 141 .2 4 1,207,173,242,207,233, 0,141,242 

1170 DATA 16q' n^'^olo 4 ' 72 - 17 3.141, 2,201, 4,208, 10,165,197,208, 6 

1171 DATA 169* 0 ' 1 18 ?' 212 ' 133 ' 216 . 104 . 76, 49.234, 32,176,200, 76,123,227 

1172 DATA U?' ' 6 ?', 8 ' 160 ' °' 32,186,255,169, 36,141, 0. 1,169, 48 

73 DATA ' 2,162 ' °' 160 ' ’• 32.189,255, 32,192,255,162 

1174 DATA 246 ^'l™' 2 ??' 169 ' ° 141 ' 60 ' 3 ' 32,228,255, 72, 32,183,255 

1175 DATA IRq' i ' 1 ’ 99,2 °2.169.147. 32,210,255,104,201, 34,208,233 

1176 DATA 566 !?' 3 ?' 2 } 0 ' 255 ’ 169 ' 23.141, 61, 3, 32,228,255, 32,210,255 
77 DATA 2 35 ?!'„«3? 28 ' 255 ' 201 ' 34.208.243,173, 61, 3,240. 10,169 

1178 DATA 355165?5??o 206, 61, 3 ' 208 ’ 248 ' 32.228,255,201, 32,240,249 
?? «?’?!?' 2 5 ' 162 ’ 4 ’ 142 ' 61 ' 3.174. 61, 3, 32,228,255, 32.210 

80 DATA Si ’ 3 ' 2 °8,2 4 2,169, 13, 32,210,255, 32,210,255, 32,228 
1181 DATA ?? 6 ???' 2 ?I'h 32 ' 228 ’ 255 ' 32 ' 228 ' 258 . 32,228,255,133, 99, 32,228 
6 ? data 25 n 13 ?' 98 ’ 162 ' 144 ' 56 ’ 32. 73,188, 32,223,189,162,255,232.189 

83 DATA tit!'?? 8 ' 250 ' 224 ' 3 ’ 240 ’ 30 ' 169 ’ 3142 ' 62 . 3- 56.237. 62 

1184 DATA .a?' 17 ?' 173 ' ’’ 1 ' 141 ' 2 ' 1l173 ’ °' 1141 ’ 4 . 1 ' 169 ' 32 

86 ha™ !?!',«• 1 ' 202 ’ 208 '236,173, 0 , 1 . 32,210,255,173, 1 , 1, 32 

ii«r ???? 210,255,173, 2, 1 , 32,210,255, 32,228,255, 72, 32,183,255,240 
I 07 n.I? 4,1 ° 4 ' 76 ' 36,202,104,201, 34,208,238,169, 32, 32,210 255, 32 
8 ? 21 °.255.169, 34, 32,210,255,169, 16,141, 61, 3 , 32,228,255, 32 

1 88 DATA 210,255,206, 61, 3. 32,228,255.201. 34,208,243, 32,210,255,169 

1189 DATA 32, 32,210,255,173, 61, 3,240, 10,169, 32, 32,210,255 206 61 

1190 DATA 3,208.248. 32,228,255,201, 32,240,249, 32,210,255! 32 228 255 

1191 DATA 32,210.255. 32.228,255, 32,210,255, 32,228,255, 32!21o!255 32 

1192 DATA 228,255,208.251,238, 60, 3,169, 13. 32,210.255,238, 6 o! 3173 

1193 DATA 60, 3,201, 36, 16, 3, 76, 67,201,169, 0,141, 60, 3!l6s!l97 

1194 DATA 201, 64,240,245,201, 0,240, 46,169,147, 32.210,255.169, 17^ 32 

1195 DATA 210,255, 32,210,255, 76, 67,201,169,169,160,207, 32. 30,171 24 

1196 DATA 160, 0,162, 20, 32,240,255,169,140,160,207, 32, 30,171 162 21 

1197 DATA 160, 0, 24, 32,240,255, 32,204,255,169, 1, 32,195l255ll69 0 

1198 DATA 133,198, 96,169,126,160,207, 32, 30.171,169. 1 , 32ll95l255l 76 

1199 DATA 94,202,169, 0,133,144.32,138.195.169, 8,133,186, 32!m255 

1200 DATA 169.111.133,185. 32,150,255, 32,165,255, 36,144,112, 5, 32,210 

1201 DATA 255,208,244, 32,171.255, 96,201, 34,240, 9. 32,115, 0,240, 46 

1202 DATA 201, 34,208,247, 32,115, 0,201. 34,240, 35,165,122, 72,165.123 

1203 DATA 72,162, 0,232, 32,140.203,240, 4,201, 34.208.246,224, 17, 48 

1204 DATA 2,162, 16,134, 87,104,168,104.170,165, 87, 76,189.255,104,104 
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1205 DATA 162, 8, 76, 55,164, 32,151,202,162, 8,169, 1,160, 0, 32,186 

1206 DATA 255, 32,237,202,169, 0,166, 43,164, 44, 76,117,225,169, 0,141 

1207 DATA 243,207, 32,115, 0,201, 80,240, 15,201, 83,240, 11,201,183,240 

1208 DATA 7,201, 82,240, 3, 76. 19,203,238,243,207,162, 20,160, 0, 24 

1209 DATA 32,240,255, 96,162, 58,169, 0,157, 0, 2,202, 16,250, 96, 32 

1210 DATA 151,202,162, 8,169, 1,160, 0, 32,186,255, 32,237,202,169, 1 

1211 DATA 166, 43,164, 44, 32,213,255, 32, 20,203,162, 28, 32,183,255, 41 

1212 DATA 16,208, 10,169,100,160,163, 32, 30,171, 76, 12,204, 76, 55,164 

1213 DATA 162, 11, 76, 55,164, 32,151,202,162, 8,169, 1,160, 1, 32,186 

1214 DATA 255, 76,225,202, 32,151,202,162, 8,169, 1,160, 0. 32,186,255 

1215 DATA 32,115, 0,201, 44,240, 3, 76, 80,203, 32,115, 0, 32,138,173 

1216 DATA 32,247,183,169, 0,166, 20,164, 21, 76,234,202,169,255,133,129 

1217 DATA 32,115, 0, 72,169, 32,133,129,104, 96, 32,151,202,169, 1,162 

1218 DATA 8,160, 0, 32,186,255, 32,237,202,166, 45,164, 46,169, 43, 32 

1219 DATA 216,255,144, 3, 76,249,224, 76, 12,204, 32,151,202,169, 1,162 

1220 DATA 8,160, 0, 32,186,255, 32,237,202, 32,121, 0,201, 44,240, 3 

1221 DATA 76, 80,203, 32,115, 0, 32,138,173, 32,247,183,165, 20, 72J65 

1222 DATA 21, 72, 32,121, 0,201, 44,208, 32, 32,115, 0, 32,138,173! 32 

1223 DATA 247,183,166, 20,164, 21,104,133, 21,104,133, 20,169, 20, 32!216 

1224 DATA 255,144, 3, 76,249,224, 76, 12,204, 76, 80.203.165,123!201. 2 

1225 DATA 208, 13,173,243,207.240, 8,169, 0,141,243,207, 76,123,227, 32 

1226 DATA 121, 0, 96, 72,169, 0,162, 17,157, 60, 3,202,208!250,104,201 

1227 DATA 34,240, 5,104,104, 76, 80,203, 32,115, 0,201, 34,208, 7,104 

1228 DATA 104,162, 8, 76, 55,164,141, 60, 3,162, 1, 32,140,203,201, 34 

1229 DATA 240, 7,157, 60, 3,232, 76, 75,204, 32,237,202, 32,103,197,169 

1230 DATA 18,141, 57,197,133, 87,169, 1,141, 60,197,133, 88,169, 49, 32 

1231 DATA 255,196,162, 13, 32,198,255,162, 0, 32,207,255,157,235,197,232 

1232 DATA 208,247,162, 5,189,235,197,205, 60, 3,240, 44,138, 24,105, 32 

1233 DATA 176, 4,170, 76,132,204,173,235,197,240, 16,141, 57,197,133, 87 

1234 DATA 173,236,197,141, 60,197,133, 88, 76,109,204,104,104, 32,204,255 

1235 DATA 32,139,197,162, 4, 76, 55,164,138, 72,168,200,162, 1,185,235 

1236 DATA 197,201,160,240, 10,221, 60, 3,208, 25,200,232, 76,190,204,189 

1237 DATA 60, 3,240, 7,201, 42,240, 3, 76,234,204, 32,204,255, 32,139 

1238 DATA 197,104, 96,189, 60, 3,201, 42,240,241,104, 76,141,204, 32, 35 

1239 DATA 204, 56,233, 3,170,189,235,197, 9, 64,157,235,197, 32, 3,205 

1240 DATA 76, 12,204, 32,103,197, 32, 82,197,165, 87,141, 57,197,165, 88 

1241 DATA 141, 60,197,162, 13, 32,201,255,162, 0,189,235,197, 32,210,255 

1242 DATA 232,208,247, 32,204,255,169, 50, 32,255,196, 32,139,197, 96, 32 


1243 DATA 35,204, 56,233, 3,170,189,235,197, 41,191,157,235,197, 76,253 

1244 DATA 204, 32, 35,204, 56,233, 3,170,189,235,197, 41, 7,240,117,201 

1245 DATA 4,240,118,133, 87, 32,214,205,232,157, 60, 3,232,138,162, 60 

1246 DATA 160, 3, 32,189,255, 32,192,255,169, 1,133, 3,169, 8,133, 4 

1247 DATA 32, 47,206,169, 2, 32,195,255, 32,237,202,169,183,160,207, 32 

1248 DATA 30,171,165,197,201, 64,240,250,166, 88,169, 0,157, 60, 3, 32 

1249 DATA 214,205,169, 44,232,157, 60, 3,169, 87,232.157, 60, 3,232,138 

1250 DATA 162, 60,160, 3, 32,189,255, 32,192,255,169, 1,133, 3,169, 8 

1251 DATA 133, 4, 32, 9,206,169, 2, 32,195,255,169, 0,133,198, 32, 68 

1252 DATA 166, 76,123,227,162, 11, 76, 55,164, 32,237,202,169,216,160,207 

1253 DATA 32, 30,171, 76,123,227,169, 2,162, 8,160, 2, 32,186,255,162 

1254 DATA 0,232,189, 60, 3,208,250,134, 88,169, 44,157, 60, 3,232,165 

1255 DATA 87,201, 1,208, 5,169, 83, 76, 5,206,201, 2,208, 5,169, 80 

1256 DATA 76. 5,206,169, 85,157, 60, 3, 96,162, 2, 32,201,255,198, 1 

1257 DATA 160, 0, 56,165, 3,229, 5,165, 4,229, 6,176, 13,177, 3, 32 

1258 DATA 210,255,230, 3,208,236,230, 4,208,232,230, 1, 76,204,255,162 

1259 DATA 2. 32,198,255,160, 0, 32,207,255,145, 3,230, 3,208, 2,230 

1260 DATA 4, 36,144, 80,241,165, 3,133, 5,165, 4,133, 6, 76,204,255 

1261 DATA 201, 34,208, 67,162, 1,169, 83,141, 60, 3,169, 58,157, 60. 3 

1262 DATA 169, 1,133, 87,232, 32,140,203,201, 34,240, 6,157, 60, 3, 76 

1263 DATA 100,206,134,183,169, 60,133,187,169, 3,133,188, 32,237,202,165 

1264 DATA 87,240, 14,169,109,160,207, 32, 30,171, 32,207,255,201, 89,208 

1265 DATA 3, 32,235,198, 76, 12,204,162, 11, 76, 55,164,201, 34,208,247 

1266 DATA 162, 1,169, 78,141, 60, 3,169, 58,157, 60, 3,169, 1,133, 87 

1267 DATA 76,100,206,201, 34,208,224,162, 1,169, 82,141, 60, 3,169, 58 

1268 DATA 157, 60, 3,169, 0,133, 87, 76,100,206, 32, 35,204, 56.233, 3 

1269 DATA 170,169,130,157,235,197, 32, 3,205, 76, 14,199,147, 13,142, 31 

1270 DATA 32, 32, 32. 32, 32, 32,213,192,192,192.192,192,192,192,192,192 

1271 DATA 192,192,192,192.192,192,192,192.192,192,192,192,192,192,192,192 

1272 DATA 192,201, 13, 32, 32, 32, 32, 32, 32,221, 32, 32, 32, 32, 32, 32 

1273 DATA 32, 32, 32. 66, 65, 83, 65, 68, 46, 65, 32, 32, 32, 32, 32, 32 

1274 DATA 32, 32, 32, 32,221, 13, 32, 32, 32, 32, 32, 32,221, 32, 32, 32 

1275 DATA 32, 67, 79, 77, 77, 79. 68, 79, 82, 69, 32, 77, 65, 71, 65, 90 

1276 DATA 73. 78. 69. 32, 32, 32, 32,221, 13, 32, 32, 32, 32, 32, 32,202 

1277 DATA 192,192,192,192,192,192,192,192,192,192,192,192,192,192,192,192 

1278 DATA 192,192,192,192,192,192,192,192.192,192,203, 13, 0. 17, 65, 82 

1279 DATA 69, 32, 89. 79, 85, 32, 83, 85, 82, 69, 32. 63. 32, 0. 13, 63 
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Letters 

Address mail to: The Editor, Commodore Magazine, Kim Books, 82 Alexander Street, Crows Nest, N.S.W. 2065 


Dear Sir, 

I am writing this letter to inform you 
that I have just presently bought 
myself a Commodore 64 Home 
computer. 

I therefore hope that you might be 
able to help me out with my problem. 

Now, I purchased the computer 
from (—a well known supermaret store 
- we're as bad as the ABC in this 
place!) store, and didn’t get an 
instruction book with the computer. 

I went back to the store where I 
bought the computer, and all they told 
me is that they don’t supply these 
computers with an instruction book. 

I know it sounds a bit stupid, but in 
fact there isn’t any thing I can do, so 
thats why I am writing this letter to see 
if I can obtain a Commodore 64 book. 

Also I believe your organization 
prints magazines, could you send me 
some information on these magazines. 

At this present moment I am making 
good use out of the computer, but 
don’t know enough features about the 
computer, till I can obtain myself an 
instruction book. 

I was wondering if you can help me 
out with this problem. 

J. Payet 
Perth W.A. 

ED - We've had some other letters 
similar to this and it is a little 
concerning . Commodore informs us 
that ALL machines should go out with 
Users Manuals. All I can recommend is 
that you write direct to Commodore 
Business Machines Pty Ltd 
Customer Service Section, 5 Orion 
Road, Lane Cove NSW 2066 or ring 
Commodore in Perth on (09) 478 
1744. 

ft Is all very well for the big 
discounters to sell Commodore comp¬ 
uters but when the guy behind the 
counter has no concept of his 
Products there is somethings wrong. 

This, however, is a two sided thing - 
you get what you pay for-service and 
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product knowledge often costs the 
difference between recommended 
retail price and discount price. 

Good luck in the future and I hope 
you join the growing numbers of 
subscribers. 

P.S. Contact your local User Group 
they can help. 

□ □ □ □ 

Dear Sir, 

I am trusting you may be able to help 
with some information. 

With the growing number of people 
doing Genealogy (Tracing your Family 
Tree) do you know of any books with 
programmes on this subject suitable 
for Commodore 64 or any pro¬ 
grammes available in Australiaforthis 
purpose? There appears to be 
programmes in America and England 
per the article in ‘Your Computer 1 of 
May ‘84. 

Trusting you may be able to help as I 
am anxious to get started just having 
purchased a 64, Disk Drive & DPS- 
1101 DaisyWheel Printer. 

D. Fagg 

Bundaberg, Qld. 

ED - We recently received the 
following information in the form of a 
press release which might help. 

GENEALOGY PROGRAM FOR 
COMMODORE 64 COMPUTERS 

A program that will produce six 
generation pedigree charts on the 
Commodore 64 computer is being 
marketed for $85 by Chambers 
Computer Supplies of Endeavour 
Hills, Melbourne. 

575 names, plus notes on each person, 
will fit on a data disk and several disks can 
be used if unlimited genealogies are 
required. 

The program is fully indexed, has easy 
screen editing and produces family record 
sheets. Output can be to screen or any 
Commodore or compatible printer. 

Each file can accomodate up to 255 
characters of information and as only 
about 100 characters are required for a 


person who has been married once, there is 
ample room for further notes. 

Features which would be of interest to 
members of the Church of Jesus Christ of 
Latter-Day Saints are provisions for 
Baptism, Endowment, Sealed To Parents 
and Sealed To Spouse. There is also a 
demo program and provision foralphabetic 
and numeric name search. 

Because it extensively interacts, the 
program requires a disk drive. It works well 
on the standard Commodore 1541 but 
reaches its full potential with even more 
generations on a MSD dual drive, which 
has 354, 000 bytes of storage, or the 
Commodore 4040. 

Telephone enquiries (03) 700 2451 

Hope this assists you. Have any of our 
readers got any other information please?. 

□ □ □ □ 

Dear Sir, 

Thank you for publishing my last letter 
in the October issue. Two errors 

1. Mr Mahoney’s Christian name is 
JOHN not Joan! - (ooops sorry!?) 

2. LINE 4 70 should read IF T> 15 or T 
< 0 etc. 

The Commodore 64 arithmetic can 
cause nasty things in programmes. 
For example 

N = 6.55 : A = N - INT(N): PRINT A 
does not give .55 but .550000001. 
Similarly if N = 4.45 the answer given 
is .449999999!! 

This caused me a days headache 
which I solved by deciding that I only 
wished to look at three decimal places 
and so made 

A = INT((N - INT(N))x1 000 +.5)/1 000 
which always gave me the right 
answers. 

I hope this note will help other 
programmers from many hours of 
anguish. 

I attach a solution to the property 
question which uses the principle 
above. 

David Belson. 

Buderim, Qld. 

ED-Thanks David. Fve forwarded your 
competition solution to Greg. Good to 
hear from you again. 
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COMMODORE 64 GAMES $5 EACH 
VIC 20 GAMES $4 EACH 

Bargain prices on a wide variety of action, 
strategy and educational games for the C64 and 
VIC 20 computers. 

Obtain your free brochure by phoning 
(02) 534 4136 or (02) 84 6860 or write to:- 
STREET GAMES - 17 Nelson Street. Thornleigh. NS.W. 2120 


SPS SOFTWARE PRODUCT SUPPORT 

Presents: 


CODE PRO 64 

Phone (02)419 5879 

P.O. BOX 229 CHATSWOOD 2067 






X? 

\ doll 


Currah speech 64 (speech synthesiser) 
Stonechip cassette interlace 
Stonechip light pen 


S69 00 
S29 95 
S3995 


UIC S 20 


Vixen 16K switchable RAM 
Vixen switchable motherboard 
Adman/Currah speech synthesiser 
Stonechip light pen 
Stonechip programmers aid ROM 


$79 00 

565 00 

566 50 
S39 95 
$2995 


Top software too. send SAE for catalogue. 

dolphin computers nsw 2064 austrolio 


99 reserve rood artarmon telephone (02) 438 4933 
telex 20677eed oust 


Attention 

1541 & SX 64 OWNERS 

Triple the speed of your disk drive loads with the 
NEW SPEEDLOAD CARTRIDGE. 

Built in enhanced DOS wedge. No wiring required. 

Eliminates drive chatter when loading 
protected disks. 

Works with some commercial software. 

Send S59.95 + S4.00 P&H to: 

EUREKA SOFTWARE 


Box 310 Niddrie VIC 3042 

D*»ier enauines welcome 





inw 


Computer Specialists for business, educational and home systems. 
SPECIAL SYSTEM AND SOFTWARE PRICES 

136 Mailtand Rd Newcastle 2304 (049) 67 5700 


f: commodore computer 

SERV.CE 


centre 


SALES 


os 

• Prompt repairs by friendly experts Melbourne's largest 

• Easy Access range of 

• Plenty ol parking Programs. Printers. Disc Drives. 

• Open Saturday mornings Dl „ . 

• Established 1968 Momto s. Plotters, etc. 

Easy access and plenty ol parking. 

TELEPHONE: 419 6811 
A A^\i\ a i^ll 0FF,CE EQUIPMENT (VIC) PTY. ITQ. 

'K IQXI'V<ctIi62 - 164 NICHOLSON ST. ABBOTSFORD- 


Commodore 64 GAMES 

STRATEGY - ADVENTURE - FANTASY 
SPORT - EDUCATION - ARCADE - SCI.FICT. 


B 


COMMODORE HEAVEN 


HUGE range available * Inquire NOW! 

Catalogue mention this AD. 
MAIL ORDER - SPECIALISTS 


No games, but everything 
else stocked at discount 

prices. We directly import 100 difTcrent lines and also deal with all the usual 
warehouses. Let us show you how- your 64 can become a powerful business machine 
Scarce items (such as Rabbits. Arrows and MSDouble and Commander II single disk 
drives) now in stock. Phone your order on kBankcard. VISA or MasterCard at any time. 

Chambers Computer Supplies (03) 700 2451 

50 Monkhouse Drive, Endeavour Hills, Melbourne 3802 
Shop Hours: Mon-Fri 8am-11am, 4pm-7pm. 

Weekend by appointment 


COMPUTER SIMULATIONS 

P.O. Rox 164 MOORABBIN 3189 - 555 8886 


To get on a REALLY GOOD mailing list 

STD FREE 008 - 025 241 


★ SOFTWARE ALWAYS 
DISCOUNTED 

★ LOWEST PRICED DISKS AND 
STORAGE IN AUSTRALIA 


^7 ^7 ^ 7^7 


★ FREE 

Program and newsletter for your 
Commodore 64 every month just 
for being on our mailing list. 

S.A.E. tos— 

CORNERSTONE 

SOFTWARE 

P.O. Box 259, 
Caringbah, 

N.S.W. 2229 


C64 USERS 

★ EPROM PROGRAMMERS 

★ MAKE AUTO-START CARTRIDGES 

★ Save & Load Program to EPROM 

★ Real world Interface 

★ 8 lines in 8 Relays out 

★ Anelog Joy sticks 

★ Dealer Inquiries welcome 


P.O. BOX 65 
RIVERSTONE 2765 
Ph: (02)627 2510 


K3EYERTROIMIX 

1---\AAAA.- AAAAAa -.- 


COMPUTER GAMES 

We have the Games you want... 

See our huge range from the leading 
Software Distributors...SEE US FIRST! 

GAMES WORLD 

8/429 Hampton Street HAMPTON 3188 
598 1014 
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MICHAEL SPITERI 


130 OPEN 2,4:CMD 2 


AN INVOICE/STATEMENT 
USING THE VIC PRINTER 


There are many advantages of owning a printer, one is 
being able to print out business forms, receipts invoices, 
etc. The only problem though is finding a program that will 
do such a thing, and as you may have discovered, 
business type software are not very cheap, and you can 
find yourself forking out quite a bit of money. What I will try 
to do is teach you how to write your own printer software. 
As an example, we will write a short program that will print 
out INVOICE/STATEMENTS (these are usually given to 
you when you buy more than one product from a store). 
These record the invoice number, date names, addresses, 
description of product, number of each product, price of 
each product, total price of all products. There is no limit 
to the amount of products you may print. The finished 
invoice will look something like figure 1 

INVUICE/STATEMENT 
INVOICE NUMBER J4 

Dm i E 21/5/84 

Tij MR FRED ChRRVSOME - NEWCASTLE - NSW 4444 
FROM BUNDLE BOOKS - SYDNEY - NSW 5555 


UUAHTI TV 

DESCRIPTION 

PRICE 

s 

1 

BIO BOO)' OF JOKES 

2. 6b 

2.66 

5 

SURER CRIME MAGAZINE 

10 

50 

100 

FULLSCAP LINED PAPER - TOP QUALITY 

.7 

70 

2 

INTRODUCTION TO HANBRITING IN COLOUR 

25 

50 

53 

SPECIAL COLOURED TEXTAS WITH FINE HEADS 

2. 33 

76.83 

99 

SPARE ERASERS 

99 

3801 

4 

SUPER COMPUTER B00) 

37.9b 

151.84 

TOTAL 



10202.39 


You can build this program as a core, and build around it 
to suit yourself if you wish. You will need an 80 column 
printer. 

I will explain each line of the program step by step, and 
inform you of some other features you can add. Let’s start 
writing the program! 

The first two lines are usually REM statements, just 
small bits of information to remind the user what the 
program is about (NOTE: anything printed after a REM 
statement will not be printed on the screen!) 

100 REM # INVOICE/STATEMENT # 

110 REM # REQUIRES VIC PRINTER # 

The next line will just print on the screen (after clearing 
it) INVOICE/STATEMENT. 

120 PRINT “(CLR| INVOICE/STATEMENT” 

Since the printer uses files to store and print the data, 
we will open a file. CMD2 directs the computer to the 
printer (the printer’s device number is 2). - We will open 
file number 2. 


Read the printer manual for information about files. 

The command used for printing something onto the 
printer is PRINT#x (it means print something to file x) 
Since x is 2 in our case, the command will be PRINT#2. 

I want to print “INVOICE/STATEMENT’ onto paper, so 
the command will be 

140 PRINT#2, “INVOICE/STATEMENT” 

To leave a line on the printer I would use PRINT#2 BY 
itself: 

150 PRINT#2 

The next line will get the user to enter the INVOICE 
NUMBER. 

160 INPUT “ENTER INVOICE NUMBER:”;IN 

We will give the invoice number the value of ‘IN’. Now 
we have to get the printer to print out the invoice number: 

170 PRINT#2, “INVOICE NUMBER:”IN 

When I run the program the printer will print out 
INVOICE/STATEMENT, then the computer will ask me to 
enter the INVOICE NUMBER. If I enter 55 then this is 
what will be printed on the printer: 

INVOICE NUMBER: 55 

Simple isn’t it! 

Line 180 will leave another line on the printer: 

180 PRINT# 2 

Next we have to get the user to enter the date, we will 
give the date the value of DA$. 

190 INPUT “ENTER THE DATE:”;DA$ 

and now to print it out: 

200 PRINT#2,“DATE:”;DA$ 

Next we input the name of the person the form is to: 
210 INPUT“TO:”;N 1 $ 

Leave another line on printer: 

220 PRINT#2 

Print out what has just been entered onto the printer: 
230 PRINT#2,“TO:”;N I $ 

Repeat the same thing for the business’s name and 
address: 
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240 INPUT“FROM:”;N2$ 

250 PRINT#2 

260 PRINT#2,“FROM:”;N2$ 

270 PRINT#2 

The rest of the program will draw up the chart and ask 
the user to enter the details of the product. 

Line 280 will print out a straight line on paper, the line is 
formed by joining 70 dashes. 

280 PRINT# 2,“- 


The next line uses a special feature of the Vic Printer- 
the CH R$(1 6). This puts the printer into tabulator mode, it 
is very simple to use. Suppose I want the printer to print 
“BOOK” at tabstop 44, this is what I do: 

PRINT#2,CHR$(16)“44BOOK”, and this will print this: 

(44 spaces) BOOK 

Using this system I can divide and print information into 
columns. Type out line 290, and I will explain what it does. 

290 PRINT#2,“QUANTITY”;CHR$(16) 

“ 15DESCRIPTION”;CHR$( 16)“50PRICE”; 
CHR$(16)“60$” 

When the program reaches this line, this is what it will 
print on the printer: 

15 SPACES , 

1 1 50 SPACES 

| ' 60 SPACES j 

QUANTITY DESCRIPTION PRICE $ 

The word QUANTITY is printed at the start of the line, 
DESCRIPTION is printed 15 spaces from the start of the 
line, PRICE is printed 50 spaces from the start of the line 
and $ is printed 60 spaces from the start of the line. 

NOTE: REMEMBER, EACH WORD OR SENTENCE 
MUST HAVE THE CHR$(1 6) BEFORE IT THEN THE TWO 
FIGURE NUMBER, if the number is below ten then print 
03 or 04 etc. 

Line 300 will print another line made up of 70 dashes 
on the printer. 

300 PRINT#2,”- 


Line 310 leaves another line on the printer. 

310 PRINT#2 

Now we have to get the user to enter the details, first 
the quantity or number of that certain product: 

320 INPUT “ENTER QUANTITY:”;Q 

Then enter the description of the product: 

330 INPUT“ENTER DESCRIPTION",D$ 


The next line will cause the program to stop if the user 
has finished entering all his products: The user has to 
enter END for the description if he has finished. 

340 IF D$ - “END” THEN 400 

The program will procede to line 400 when the user has 
finished. If he has not finished then it will continue 
entering more products. 

Line 350 asks the user to enter the price for the 
product. 

350 INPUT “PRICE”;P 

If we multiply the PRICE by the QUANTITY we will be 
left with the final amount, e.g. if the person bought 3 
books at 5 dollars each, the total will be 1 5 dollars. 

360 FP = Q * P 

We gave the final price the value FP. 

The next line will add up all of the final prices to give us a 
grand total. 

370 TP = TP + FP 

If you do not understand I will explain: 

A man buys 3 books at 5 dollars each, the invoice will 
look like this: 

QUANTITY DESCRIPTION PRICE $ 

3 Books $5 15 

- this is the Final price. 

The man also buys 10 markets at 2 dollars each 

10 Markers $2 20 

— another Final price. 

The grand total is the cost of the BOOKS and 
MARKERS added together, which is 35. Line 380 prints 
out the quantity, description and price etc. 

380 PRINT#2, Q;CHR$(16)“10”D$;CHR$(16)“50"P; 

CHR$( 16);“60”;FP 

This line looks very confusing. I will explain it step by 
step PRINT#2,Q - print quantity CHR$(16)“10”D$ - 
prints description at TAB 10 (ten spaces from start) 
CHR$(1 6)“50”P- prints price fifty spaces from start, and 
finally CHR$(1 6)“60”;FP - prints final price sixty spaces 
from start. So all we are actually doing is lining up the 
inputs with the right column (see example invoice/ 
statement). 

Line 390 returns the program back to line 320 for the 
next input of product. It is just a continuous loop that 
stops when the user types in “END” for the description! 


Continued on page 56 
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TURBO- 
64 

Previously known as TURBO-DOS 

by Paul Blair 


I’m using Easy Script to write up this review. It took me 
ten seconds to load from disk with Turbo-64. 

Stop and think about that for a moment. If you have sat 
and waited for Easy Script to load from a normal disk, you 
will realise that I have loaded it about five times faster 
than normal. At last there is a way to make the 
cantankerous, funereal 1541 do something at acceptable 
speed, thanks to the clever lads at Cockroach. If you have 
been driven to despair by the speed (I use the word 
advisedly) of the 1541, then Turbo-64 is for you. 

It works like this. Load the Editor from the Turbo-64 
system disk, and you’re away. Turbo-64 uses a special 
disk format, so the first thing to do is to create a storage 
disk. If you haven’t read the instructions yet, simply follow 
the clear screen directions. 

After accepting your choice of disk name and disk ID, 
the formatting starts, and takes about 30 seconds. If you 
wish,you can repeat this step to create a store of special 
disks. 

Now it’s time to transfer programs from your standard 
disks to the Turbo storage disk. Turbo-64 will read the 
directory from a disk, and prompt you to select the 
programs for transfer. As Turbo-64 will accept 20 
programs or 664 blocks on each disk, you have plenty of 
room for lots of material. Each program will be read into 
your computer, then (after swapping disks) written out to 
your special disk. 

This read/swap/write process can go on with different 
standard disks until the special disk is full,or you have 
nothing more to transfer. 

Now, how to use it. LOAD‘T’,8,1 will get you a directory 
of yourTurbo’ed disk in a few seconds. From there it’s one 
keystroke to load and autorun the program of your 
choice. And is that load fast!! 

What then? Want to change a program name? Erase a 
program? Change the colours on the directory? Print a 
hardcopy (with a lot of program information)? Turbo-64 
takes care of all that for you, which greatly enhances the 
flexibility of the system. Disks created this way may be 
backed-up with fast backup (snapshot type) programs. 
They will run without special software on any C64/1 541 
combination without hardware changes. Multi-user 
systems (such as VIC-SWITCH) love Turbo’ed disks. 


Now, some no-noes. Some programs are not suited to the 
Turbo process. Programs on DOS-protected disks will 
most probably transfer, but may not run because the disk 
errors will not be in correct locations. Chained (multi-part) 
programs will not find second or subsequent sections, 
because Turbo-64 stores program names a little 
differently. I can’t chain from Easy script to Easy Spell 
from a Turbo’ed disk, but I can work from a standard disk 
at normal speed. 

In my own perverse way, I tried to crash Turbo-64, and 
the disk it creates. I didn’t succeed, thanks to the error 
trapping built in. Short of dunking the disk in vegetable 
soup (a weakness of our Editor) I can’t figure out how to 
muss things up. The only difficulty I can envisage would 
be with an out-of-alignment 1541, but let’s not dwell on 
that one. 

Cockroach (don’t ask me where it came from) offer 
warranty on all products, but I doubt if its ever needed. 
But, for your protection, a warranty card is included with 
each disk. 

Product: Turbo-64 
Rating: 9.5 out of 10 
Price: $45 

Supplier: Cockroach Software 


Sufteniox Jp 

15 PROGRAMS for under $19.00 
VIC FAMILY PACK - VIC 20 

15 Super Programs taken form the VIC FAMILY BOOK 
6 Games - 5 Educational Programs - 4 HOME/BUSINESS 
Programs ★ LIMITED OFFER ★ 

TAPE $15.00 DISK (TBA) $18.00 

GARDEN OF EDEN - CBM 64 

A new Adventure for the CBM-64. You take the role of Adam, 
searching for the key of life. Even Eve and the Snake are 
there! In TEXT ONLY. 

TAPE $15.00 DISK $18.00 

MASTERMIND 64 - CBM 64 

How many Questions can you answer? Over 100 questions, 7 
subjects with all the features of the TV favourite. Up to 4 
Players. 

TAPE $14.00 DISK $17.00 

AVAILABLE SOON 

Horse Selection $14.00 Tape House of Death $18.00 Tape 
C64 - Betting Program C64 - 100% M/C Game 

ASK ABOUT OUR BBC RANGE OF PROGRAMS 

Add S2.00 for postage and packing 

(03) 786 9778 
20 LAROOL CRESCENT 
SEAFORD VIC. 3198 
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ISAM-KRAM 

by Paul Blair 


One of the more useful tasks for your computer is data 
storage and retrieval. It doesn’t matter whether you are 
storing recipes, stamp collection indexes, a Christmas 
card list or racing form. Given the correct approach, 
designing and using a computer-based information 
system will not only broaden your programming skills, but 
it is likely to be useful as well. That’s two for the price of 
one, which is good value in anyone’s language. 

Data is data whatever is to be stored, so let’s set about 
learning some more about setting up a file or two. There 
are some useful tricks that can make the job easier, and 
the final product more fun to use. 

Commodore has provided the tools to create different 
methods of data storage. Depending on the type of 
program that we want to create, we may choose the best 
to suit our ends. 


FILE TYPES 


The principal forms of storage take two distinct formats. 
SEQUENTIAL files store data in ‘streams’, much as music 
is recorded on tape. Sequential files may be used with 
both cassette and disk, and are a quite satisfactory way of 
handling small amounts of information. Because the 
information is stored byte after byte in a long chain, it can 
be very difficult to find specific parts of any file. It is usual 
to read complete files into the computer, fiddle with them, 
then write them back to storage as a complete block. As 
mentioned, this is quite satisfactory for small files. 

But suppose we want to set up a mailing list for 800 
families, and we figure out that each entry will need about 
60 characters to store the information about each family. 
Eight hundred times 60 is 48,000 (or 48K) and 48 into 39 
won’t go. If we did manage to set up a sequential file, 
some form of subdivision would be required to handle the 
files. But there is an easier (and quicker) way. 

This brings us to RELATIVE files, for which we will need 
a disk drive. This type of file is really a clever form of 
random access file -clever because the disk drive will do 
most of the work for us. Why ‘relative’? The only 
explanation that I can give is that the relative position of 
each record on the disk is known to the disk drive so very 
fast access times are possible. 

Once a relative file has been properly created, we need 
only tell the computer the number of the ‘record’ that we 
want, and it will be ours in short time order. This Record 
Number is all important, so if we can figure a convenient 
way of remembering all the numbers of the records in our 
file, we will be able to use relative files effectively. 

One suggestion would be to set up a card index 
containing all the names of the families on file, with the 
record number (RN) for each. But we have a computer, so 
why not use that? Could we set up an index file, so that we 
may manage the principal file to best effect? 


The answer is, of course, to use an index file, small 
enough to be easily accommodated in computer memory, 
and clever enough to permit access to our main file. This 
type of approach has a name - well, two really. ISAM 
stands for Indexed Sequential Access Method. KRAM 
stands for Keyed Random Access Method. To all intents 
and purposes, they are the same thing. Each makes an 
index which relates keys and RN’s. By hunting for a key, 
we can get the correct RN, and the rest is easy. 

Suppose we use surnames as our key. As we create 
each record, we will add the RN to the key. If we had the 
Jones family, and they are the third entry in our list, the 
index file would contain JONES003 - key plus RN. 

We also need a way of marking empty entries, or entries 
that have been deleted, so that we can find a vacant place 
in the main file when we want to make a new entry. To do 
this, we will use the ‘0$’ character in place of the surname 
(key) in our index. So, let’s set up an index file for 50 
records, and mark them all as blank (i.e., available for use) 

100 REM: FILEMAKER 

110 REM: COMMODORE 64 

120 REM: TODAY’S DATE 

130 PRINT CHR$( 147)“SETTING UP SEQ FILE” 

140 SX=2:RS=CHR$( 13):FE$=CHRS(91 ):OPEN 15,8,15 
150 OPEN 2,8,SX,“0:MASTERLIST,S,W” 

160 FOR T = 1 TO 50 

170 TS = RIGHT$( STR$( 1000+T),3) 

180 TS = FES+TS 
190 PRINT#2,T$ 

200 NEXT:CLOSE 2 

Some disk error checking would be in order, so add:- 

155 GOSUB 400 

205 GOSUB 400 

400 INPUT# 15,EN,EM$,ET,ES 

410 IF (EN=50) OR EN<20 THEN RETURN 

420 PRINT“STATUS:”EN:EM$;ET;ES:CLOSE15:END 

The routine open a sequential file named MASTERLIST 
ready to write (’,S,W’). T$ is set up to contain the empty 
record marker ‘[ ’, plus a record number padded out with 
zeroes (the reason for adding 1000 and then chopping off 
the ‘thousands’ digit) so know that the RN is a particular 
part of every index entry. The end product is then written 
to file, followed by a carriage return. 

The resulting file will contain 50 strings that look like: 

c $001 
: S 002 

C S003 and so on to 
C $050 

Why the T ’? Well, it is the character after ‘Z\ and the 
reason for that choice will become clear soon. Don’t run 
the program yet, we have some more to add to it. 

We can now turn to our relative file-to-be. If you have 
struggled with the examples given in the 1 541 Disk Drive 
Manual, let me try to set out the simple and correct way of 
creating a relative file for use. 

To set up a relative record file, our computer 
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only needs to know what name to give the file, how many 
individual records we want to write, and how long each 
record will be. After that, we may sit back and let the 
machine do the work. 

We can set up a new file with just one record in it, or we 
can think ahead and set up a complete file of records. The 
first method is quick to set up, but slow to use, because 
the computer has to extend the file each time we want to 
add a record. The second way is a bit longer to start with, 
but quicker in use because space for a new record is 
already reserved. It’s safer, too, because we can ensure 
that we don’t run out of disk space. Pre-extension, to give 
it a name, is pre-ferred! 

The syntax that follows will work. There are some 
erroneous versions around, and some books (eg, 
‘Commodore 64 Exposed’) don’t mention anything! To 
pre-extend a relative file, the trick is to write to the LAST 
record we think we will need. If we plan on 50 records, 
then we set up a new file by simply writing record 50, and 
the disk operating system will write the other 49 for us. 
Each record will contain CHR$(255), which is Pi. This 
handy little character is used by the computer to signal 
end of information - that is, there is no more data to follow, 
or, in other words, end of a record. 

Let’s set up our 50 records (RN), allowing room in each 
record for 60 characters (LR). Add these lines to the 
others. 

210 PRINT CHR$( 147)“SET UP RELATIVE FILE” 

220 RN=50:BN=1:LR=60 
230 D$=“,L,”+CHR$(LR) 

240 OPEN 3,8,SX,“MASTER FILE”+D$:GOSUB400 
250 GOSUB300 

260 PRINT#3,CHR$(255):GOSUB400 
270 CLOSE3:CLOSE15:END 

Now a short subroutine to set up the syntax for 
‘pointing’ to any record we want: 

300 RH=INT(RN/256):RL=RN AND 255 

310 PS=“P”+CHR$(SX)+CHR$(RL)+CHR$(RH) 

RL and RH are the low byte/high byte representation of 
the record number, RN.To position to a specific byte (BN) 
within a record, we need to add one more parameter to 
P$: 

320 P$=P$+CHR$(BN) 

330 PRINT# 15,P$ 

340 RETURN 

If we don’t add the positioning pointer BN, the program 
will assume Position 13, which it ‘reads’ from the carriage 
return sent with the position command. 

Note that the second comma in line 230 is all important, 
and is often missing when people describe relative file 
syntax.An important point to note here concerns the 
maximum length of a relative record. The design of the 
Disk Operating System sets an upper limit per record of 
254 bytes. That may appear restrictive, but in practice it 
works out to be a more than generous allowance. 


WHAT DO WE DO NOW? 


Now that the system files have been set up, we can get 
down to using ISAM for real. You should refer to the 
program listing for any specific points if you are in any 
doubt. 


When listings such as this cross your path, it is a good 
idea to take a pencil and mark those parts that are purely 
utility, such as input routines, disk error checking and so 
on. Do it now with the listing, marking out: 


Lines 190-240 
Lines 1500-1520 
Lines 2000-2030 
Line 2100 
Lines 14000-14010 
Line 17000 


Menu 
Key wait 
Disk errors 
Pause 
Front page 
Screen header 


That clears away some space to think. What is left is 
pretty fundamental stuff, but useful. 

The Menu is set up so that we may add records, delete 
or amend them, or simply view the file entry or the key 
index file at any time. By and large, those items would 
form a good base for any data collection program. 

Let’s step through the types of actions associated with 
the principal commands, trying to set out a logical order of 
operations. 


1. ENTER A NEW RECORD 

(a) Find a vacant record space to use 

(b) Get the record number (RN) of that space 

(c) Get the new entry key (surname) 

(d) Change the index element from ‘ORN’ 
to ‘KEYRN’.. key+RN 

(e) Get the rest of the record entry 

(f) Write the record to disk 

(9) Flag that the index file has been changed 

2. AMEND A RECORD 

(a) Ask user for key 

(b) Find key, get RN associated with it 

(c) Get record from disk, show it 

(d) Get amendment from user 

(e) Make a new index element if the key has 
been changed 

(f) Write the record to disk 

(9) If (e) then flag that index has been changed 

3. DELETE A RECORD 

(a) ) 

(b) (-As for AMEND 

(c) ) 

(d) Ask whether deletion should continue or 
abort 
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Fileuser 


by Paul Blair 


100 REM“ 

101 REM“ 

## FILEUSER ## 

102 REM“ 

103 REM“ 

EXAMPLE FILE 

104 REM“ 

- RELATIVE FILES 

105 REM“ 

- BINARY CHOP 

106 REM“ 

- ISAM+KRAM 

107 REM“ 

108 REM“ 

COMMODORE 64 

109 REM“ 

1541/4040 DR 

110 REM“ 

USES SSORT64 

111 REM“ 

112 REM“ 

PAUL BLAIR 

113 REM“ 

114 REM“ 



125 : 

130 IFPEEK(52430)=165THEN140 :REM SEE IF THERE 

135 LOAD“SSORT64”,8,l :REM THEN LOAD IT 

140 CLR:M=53280:LN$=“-”:FORA= 1 T06:LN$=LN$+LNS: 

NEXT:LN$=LEFTS(LN$,39) 

145 GOSUB14000:DIMMF$(60):R$=CHR$( 13):BL$=“ 
F0RA=1T06:BL$=BLS+BL$:NEXT 
150 POKEM.14:POKEM+l,2:OPEN 15,8,15.GOSUB2000 

:REM ERROR CHANNEL 

155 OPEN2,8,2,“0:MASTERLIST,S,R”:GOSUB2000:A= -1 

:REM READ INDEX 

160 A=A+1:INPUT#2,MF$(A):TS=ST:IFLEFT$(MF$(A),1)=“(” 
THENTL=TL+1 
165 IFTS=0THEN 160 

170 CLOSE2:PRINT“[CRDN]”A+l“RECORDS IN FILE” 

180 PRINT“[CRDN]”TL“RECORDS UNUSED”:PRINT“[CRDN)” 
LN$:GOSUB1500:GOSUB 10000 

187 REM“ - 

188 REM“ MAIN MENU 

189 REM“ - 

190 HD$=“MAIN MENU”:GOSUBl 7000:PRINT“ 1 ...TO ADD TO 
FILE”:PRINT“Q2...TO DELETE” 

200 PRINT“Q3...TO FIND RECORD”:PRINT“Q4...TO AMEND”: 
PRINT“Q5...TO DISPLAY” 

210 PRINT“Q6...TO QUIT”:PRINTLN$:PRINT“|CRDN|PLEASE 
MAKE YOUR CHOICE” 

220 GETANS:IFANS=“”THEN220 

230 AN=VAL(AN$):IFAN<lORAN>6THEN220 

240 ONANGOSUB4000,5000,6000,7000,8000,20000:GOT0190 

1497 REM“ - 

1498 REM“ WAIT A BIT 

1499 REM“ - 

1500 POKE 198,0:PRINT“[CRDN]PRESS ANY KEY 
TO CONTINUE” 

1510 GETAN$:IFAN$=“”THEN1510 
1520 RETURN 

1997 REM“ - 

1998 REM“ DISK ERROR 

1999 REM“ - 

2000 INPUT# 15,EN,EM$,ET,ES 

2010 IF(EN=50)OREN<20THENRETURN 

2020 POKEM, 14:PRINT“[CRDN]ERROR=”;EN;EM$:ET;ES 

2030 CLOSE15:END 

2100 FORDL=lTO3000:NEXT:POKEM. 14:RETURN 

3997 REM“ _ 

3998 REM“ ADD A RECORD 

3999 REM“ - 

4000 GOSUBI0000:FL=l:HD$=“ADD A RECORD”: 

GOSUB17000:FORUY=0TO49 

4005 IFLEFT$(MF$(UY),1 )=“|”THENID$=RIGHT$(MF$(UY),3): 

ID=VAL(ID$):GOTO4020 
4010 NEXT 

4020 PRINT“ENTER KEYNAME ”:P3=15:GOSUB 12000: 

PRINT“QYOUR KEY IS: ”P$:I$=PS 
4025 MFS(UY)=P$+ID$ 

4030 PRINT“|CRDN]ENTER DETAILS ”:P3=35:GOSUBl2000: 

PRINT“QYOUR ENTRY IS: ”J$+“ ”+PS 
4040 OP$=J$+“ ”+P$:UY=ID:GOSUBI3000:GOSUB1500:RETURN 


4997 REM“ - 

4998 REM“ DELETE RECORD 

4999 REM“ - 

5000 HD$=“DELETE”:GOSUB17000:GOSUB6010 

5010 PRINT“[CRDN]TYPE D TO DELETE OR M FOR MENU” 

5020 GETANS:IFANS=“”THEN5020 

5030 IFAN$=“M”THEN 190 

5040 IFAN$=“D”THENFL= 1 :GOTO5060 

5050 GOTO5020 

5060 MF$(ZZ)=“[”+IDS:GOSUB 1500:RETURN 

:REM RESET INDEX 

5997 REM" - 

5998 REM“ FIND RECORD 

5999 REM“ - 

6000 HD$=“SEARCH”:GOSUBl7000 

6010 PRINT"WHICH RECORD PLEASE? ”;:P3= 12:GOSU B12000: 

ZT$=PS:GOSUB9200:GOSUB9000 
6020 IFNF=0THENGOSUB 11000:RETURN :REM NOT FOUND 
6030 NF=0:GOSUB2100:RETURN :REM FOUND 

6997 REM" - 

6998 REM" AMEND RECORD 

6999 REM" - 

7000 HD$=“AMEND RECORD”:GOSUB17000:PRINT“WHOSE 
RECORD TO AMEND? ”;:P3=15 

7010 GOSUB 12000:ZTS=P$:GOSUB9000:UY=ZZ: 

PRINT“[CRDN]AMEND TO- ” 

7020 GOSUB4020:GOSUB2100:FL=1:RETURN 

7997 REM" - 

7998 REM" PRINT KEYS 

7999 REM" - 

8000 GOSUB 10000:HD$=“LIST OF RECORDS”:GOSUB 17000 
8010 PRINT“PRESS ANY KEY TO SEE LIST OF RECORDS”: 

PRINTLN$“[ CRDN]” 

8020 GETANS:IFAN$=“”THEN8020 
8030 AR=0:FORUY=0TO50:AB$=LEFT$(MF$(UY),l): 
IFAB$=“[”ORAB$=“”THEN8050 

8040 PRINTRIGHT$(MFS(UY),3)“.”LEFT$(MF$(UY), 

LEN(MF$(UY))-3):AR=AR+1 

8050 NEXT:PRINT“[CRDN]”LN$:PRINT“|CRDN]TOTAL USED 
RECORDS ”AR:PRINT“iCRDN]”LN$ 

8060 GOSUB 1500:RETURN 

8997 REM" - 

8998 REM" CHOP SEARCH 

8999 REM" - 

9000 GOSUB 10000:ZT=0:ZB=49 :REM SET TOP, BOTTOM 
9010 ZM=ZT+INT((ZB-ZT)/2):ZI$=MF$(ZM):GOSUB9200 

:REM CENTRE ELEMENT 

9020 IFZI$=ZT$THEN9060 
9030 IFZT=ZMTHEN9190 

9040 IFZI$=“”ORZT$>ZI$THENZT=ZM:GOTO9010 

:REM KEEP BOTTOM HALF 

9050 ZB=ZM:GOTO9010 

:REM KEEP TOP HALF 

9060 ZB=ZM 

9070 IFZB-1 <0THEN9100 

9080 ZI$=MF$(ZB-1 ):GOSUB9200:IFZI$<>ZT$THEN9100 
9090 ZB=ZB-l:GOTO9070 
9100 ZT=ZM 

9110 IFZT+1 >ATHEN9140 

9120 ZI$=MF$(ZT+1 ):GOSUB9200:IFZI$<>ZT$THEN9140 
9130 ZT=ZT+1: GOT09110 

9140 FORZZ=ZBTOZT:PRINT“|CRDN1”LEFT$(MFS(ZZ), 
LEN(MF$(ZZ))-3) 

9150 NEXT 

9160 IFZZ=0THENID$=RIGHT$(MF$(ZZ).3):ID=VAL(ID$): 
GOTO9180 

9170 ZZ=ZZ-1:ID$=RIGHT$(MF$(ZZ),3):ID=VAL(ID$) 

9180 RETURN 

9190 POKEM,2:PRINT“|CRDN| NO MATCH FOUND ”:NF=1: 
RETURN 

9200 IFLEN(ZI$)>LEN(ZT$)THENZI$=LEFT$(ZI$,LEN(ZT$)) 
9210 RETURN 

9997 REM"- 
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9998 REM 44 SORT IT ALL 

9999 REM“ - 

10000 POKE905,1 :SYS52430:RETURN 

10997 REM“ - 

10998 REM 44 ACCESS FILE 

10999 REM 44 - 

11000 OPEN4,8,4,“MASTER FILE”:GOSUB2000 

11005 PRINT# 15,“P”CHRS( 100)CHR$(ID)CHR$(0)CHR$( 1): 
INPUT#4,IN$ 

11010 PRINT“[CRDN]RECORD IS-“:PRINTIN$:CLOSE4: 
GOSUB2000:GOSUB 1500:RETURN 

11997 REM“ - 

11998 REM 44 INPUT INPUT 

11999 REM 44 - 

12000 P$=“”:FORQ= 1 TOP3:PRINTCHR$( 166);:NEXT: 

FORQ= 1 TOP3:PRINT“[CRRT]”;:NEXT 

12010 GETA$:IFA$=“ ’’THEN 12010 

12020 IFA$=CHR$( 13)THENPRINTLEFT$(BL$,P3-LEN(P$)): 
RETURN 

12030 IFA$= 44 “THEN 12070 
12040 IFA$<>CHR$(20)THEN12100 
12050 IFP$=““THEN 12000 

12060 FORQ=lTOLEN(P$):PRINT“[CRRT]“;:NEXT:GOTO 12000 
12070 IFP$=““THEN 12010 
12080 IFLEN(P$)= 1 THENP$= 44 “:GOTO 12060 
12090 P$=LEFT$(P$,LEN(P$)-1 ):PRINT“[CRLFT]“CHR$( 166) 
44 [CRLFT]”;:GOTO 12010 

12100 IFA$<“ “OR(A$> 44 Z“ANDA$< 44 C”)THEN12010 
12110 IFP3=1THENP$=A$:PRINTP$CHR$(13);:RETURN 
12120 IFLEN(P$)=P3THENPRINTCHR$( 13);:RETURN 
12130 P$=P$+A$:PRINTA$;:G0T012010 

12997 REM 44 - 

12998 REM 44 OUTPUT FILE 

12999 REM 44 - 

13000 OPEN4,8,4,“MASTER FILE“:GOSUB2000 

13010 P$=“P“+CHR$( 100)+CHRS(UY)+CHR$(0)+CHR$( 1): 

PRINT# 15,P$:PRINT# 15,P$ 

13020 PRINT#4,OP$R$;:CLOSE4:GOSUB2000:RETURN 

13997 REM 44 - 

13998 REM 44 PRETTY PAGE 

13999 REM 44 - 

14000 PRINT“[CLS WHT] ISAM/RELATIVE FILES “ 

14005 PRINT“[CRDN] COMMODORE 64 CRDN] 

14010 PRINTLNS:RETURN 

16997 REM 44 - 

16998 REM“ PAGE HEADER 

16999 REM 44 - 

17000 PRINT“[CLS CRDN]“;:MM=(LEN(HD$))/2: 
PRINTTAB(20-MM)HD$:PRINTLN$:RETURN 

19997 REM 44 - 

19998 REM 44 FINISH OFF 

19999 REM“- 

20000 IFFL=0THENPRINT“[CLS]“:END 

:REM NO CHANGES 

20005 HD$=“REWRITING INDEX FILE“:GOSUB 17000 

:REM NOTE CHANGES 

20010 OPEN2,8,2,“@0:MASTERLIST,S,W”:GOSUB2000 
20020 FORV=OTOA:PRINT#2,MF$(V)“,“R$; 

20030 NEXT:CLOSE2:GOSUB2000:PRINT“[CLS]“:END 

N.B.C = CHR$91 

Well, that’s the program. Remember, it’s intended as a 
framework to give you some ideas on how the modules fit 
together to make a data base using relative files. There is 
loads of scope for you to add bells and whistles, alter the 
record size and numbers to suit your own needs, and so 
on. 

SSORT? What’s that. OK, it’s a pretty slick machine 
code sorting routine. If you don’t have a copy, try your 


local User Group, or maybe the Editor will find it in his 
heart to publish the extra material that goes with this 
series, and you can type it in for yourself. All else failing, 
try our Reader Service, who could arrange to send you 
the routine on disk. 

Ed: We will try and publish this additional inform¬ 
ation in next issue - also include it on DISK#2. 


CounMueP 

I^Wvi Ar&xicue 

The suggested solutions seems to me to conflict, but 
here they are: 

(a) Always send the ‘position’ command twice. This 
ensures that it is received and (hopefully) 
understood. 

(b) Slow down data transmission to the disk drive, by 
a small time loop or some such technique. 

It is possible to demonstrate the problem by writing to a 
record in small steps, particularly if the record is large and 
likely to be stored spanning across two sectors on disk. 
There does not seem to be a universal syntactical fix for 
the problem, but if more people work at it, the chances of a 
solution impro/e. 


(C) 1984 Paul Blair 

may be reproduced with acknowledgement 
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Where is your Commodore? 


NEW MULTI-MODE ’ COMPAL ’ DESKS ARE AS GOOD AS THEY LOOK ! 
The unique slide-out desk and pivoting note-rest make 
it the ideal workstation for your personal computer. 
FINISHED 1N DURABLE MELAMINE: BEIGE. TEAK, PINE, WALNUT 

STAND ONLY $195 INCLUDING DELIVERY pat/des 
STAND & LEGS $255 TO YOUR DOOR pending 

TO ORDER: SEND NAME, ADDRESS, PHONE AND FINISH WITH 
YOUR CHEQUE, OR ADVISE BANKCARD, MASTERCARD OR VISA . 

Spacestation FUF^mjRE 

A 1A STIRLING HIGHWAY,COT TESLOE ,601?. Ph (09).I84.8499 
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Continued from page 40 

380 NEXT 

390 D=1:F0RK=2T05 
4O0 IFS(K)OS< 1 )THEND=0 
410 NEXT 

430 X=0 s F0RK=1T04 
440 IFHOO >N<K+1)THENX=N 
<K>:N<K)=N(K+1):NCK+l)= 
X 

450 NEXT:IFXTHEN430 

479 IFN<2>=N<1)+lAHDN<3) 
=H(1> +2ANDN(4)=NC1)+3AN 
DN <5 > =N < 1>+4THEN620 

480 IFNU > = 1ANDNC2)=2AND 
N C3>=3AHDN<4 )=4ANDN<5> = 
13THENG20 

490 IFBTHEHQ=4:6DTO640 
500 X=1 

510 IFN(X)< N < X+1)THEN575 
520 IFX=4THEN610 
530 IFN<X) < N <X+2)THEH577 
540 1F X=3THE NQ=2:GOT0640 
550 IFN<X>-NCX+3)THEHQ=6 
:GOTO640 

568 Q=2:1FX=1ANDNC4 )=H(5 
)THENQ=5 
570 bOT0640 

572 IFN < 4)<N<5)THEN610 

574 Q=1:GGTOG40 

575 X=X+1:IFX<5THEN510 

576 GOTO150 

577 IFX=3THEN610 
580 IFX=2THEN572 

590 IFN<3> =N(5>THENQ=5:G 
OTOG40 

GO0 IFN(3> =N<4>ORN<4 ) =N< 
5)THEHQ=1:GOTOG40 
610 IFNCX)< 10THEN150 
G15 Q=@:GOTOG40 
G20 IFD=@THENQ=3:GOTDG40 
630 0=7:1FN C 4 ) = 12T HENQ=8 
640 -J=G2:1=8196-0*44 
645 IFQ>4THEHI = I + 176: J=3 
1 

650 POKEI+30720.0:FORK*1 

top<q>*b 

660 POKEL,J:FDRX=1TO300: 
NEXT 

670 POKED,200:T=T+1:GOSU 
B800:POKED,0:POKE 1,32:N 
EXT:GOTO150 
700 K=INT C R+RNO<1) +1) 

710 D=CX<K>+12:R=R-1 
720 FORI=KTOR 
730 C’4 < I > =CX <1 +1 >: NEXT 
740 SCJ)=INT(D.'13> 

750 NCJ>=D+1-13*S<J>:RET 
URN 

770 POKED,150:C#=M10$ <"2 
3456789XJQKA",NCJ>,1>:S 

"♦¥**"'SCJ),1) 
775 PR INTM IDTO'iiS” , SC J ) ✓ 
2+. 5, 1 >: POKED, O: B#= " ,5388 
118 " •’ D#="SBMIi" 

777 E#=" “+C#:C$=C#+" 

IFNCJ) =9THENC$="10":E#= 
"10" 

780 PR I NT " TAB C 4+J- 

3 > 5 C# " S10BI";: G0SUB1: PR 
IHT "ffllBBI "E#; 

790 PRINT"3":RETURN 
300 PRINT"SSSfeUmi"RIGHT 
$ C 8TR# C B ) , 1 >; TAB C 39> 5 RI 
SHT$C " ”+STF:$CT), 4 >: R 
ETIJRN 

810 IFB=1THENF0R.J=1T05: G 
OSUB900: NEXT: F'R 1 NT " 


815 GOSUB800 

82D F'R I NT " SMSfilSMSSSSSJ" T A 
BCG)jRIGHT#C" "+STR#CPC 
8)+6),4);TAB C20); RIGHT* 
C" "+STR$CPC4)*B),2) 

830 PRINTTABC7)jRIGHT$C" 
"+STR#CPC7>*B>,3);TAB< 
20)j RIGHT#C" "+STRTCPC3 
)*B),2) 

846 PR INTTAB C 7 >:RIGHT# C" 
"+STR#CPC6)*B >,3)j TABC 
20);RIGHT#C" "+STR$CPC2 

)+B),2) 

850 PRINTTABC8);RIGHTTC" 
"+STR# CPC 5)+B),2)j TAB< 
20);RIGHT#C" "+STR#<PC1 
B> , 2> "3" 

890 RETURN 

900 PR I NT" HHH" = FOR I = 1T 
09 = F’R I NT TAB < 4+J-3 > " WM" 
s NEXT 

910 RETURN 
READY. 


Continued from page 28 

Other Groups 


NSW 

Name: VIC 64 User Group 

Address: 11 Solander Rd, Kings Langley, NSW, 2147. 

Name: Compu-Tech Computer Club 
Address: 8 Qulai St, Charlestown, NSW, 2290 

Name: New England Micro-Computer User Group 
Address: Unit 1/7 Fitzroy St, Tamworth, NSW, 2340 

Name: CYSS Tamworth 

Address: 242 Marius St, Tamworth, NSW, 2340 

Name: Albury-Wodonga User Group 
Address: 240 Butt St, East Albury, NSW, 2640 

Name: Commodore Users Group 

Address: 472 Anzac Pde, Kingsford, NSW, 2032 

Name: Hornsby Commodore Users Group 

Address: 452 Somerville Rd. Hornsby Heights, NSW, 2077 

Name: SYDCOM Address: P.O. Box 451, Spit Junction, NSW 
2088.(??? one of three different addresses) 

Name: Cumberland Micro User Group 
Address: Granville Library, Granville, NSW, 2142 

Name: VIC 20 User Group 

Address: 53 Lytton St, Wentworthville, NSW, 2145 

Name: Deniliquin Commodore User Group 
Address: 139 Davidson St, Deniliquin, NSW, 2710 

VIC. 

Name: Western Suburbs User Group 
Address: 16 McNamara Rd, Laverton, VIC, 3028 

Name: Laverton Commodore User Group 
Address: School of Radio RAAF, Laverton, VIC, 3028 

Name: Melbourne VIC20 User Group 
Address: P.O. Box 252, Northcote, VIC, 3070 

Name: Bendigo Commodore Users Group 
Address: 5 Board Court, Kangaroo Flat, VIC, 3555 

Name: Warragul Commodore User Group 
Address: Walkers Rd. Warragul, VIC, 3820 

Name: Mornington District Commodore Group 

Address: Tanti Park Community Centre, Mornington VIC 

3931 
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QLD 

Name: QLD Commodore User Group 

Address: 151 Jubilee Terrace, Bardon, QLD, 4065 

Name: Rockhampton User Group 

Address: c/- 50 Ocean Pde, Yeppoon, QLD, 4703 

Name: Mackay User Group 

Address: c/- 8 Eaglemount Rd, Andergrove, QLD, 4740 

Name: Mt Isa Commodore Computer User Group 
Address: 3 Crystal St, Mt Isa, QLD, 4825 

Name: Ingham Computer Club 

Address: P.O. Box 899, Ingham, QLD, 4850 

Name: Commodore User Group Tedita Pty Ltd 
Address: 116 Griffith St, Coolangatta, QLD, 4225 

S.A. 

Name: Commodore Users Association of SA 
Address: P.O. Box 60, Clarence Gardens, SA, 5039 

Name: S.A. User Group 

Address: 19 Right Ave, Northfield, SA, 5085 

Name: Commodore/VIC 20 User Group 
Address: 13 Miranda Rd, Palowie, SA, 5108 

W.A. 

Name: WACCUA 

Address: P.O. Box 31, Leederville, WA, 6007 
Name: VIC UPS 

Address: 4 Shield Rd, Lesmurdie, WA, 6076 

Name: Cooloongup Commodore Users Group 
Address: 16 Variety Crescent, Cooloongup, WA, 6168 

NEW ZEALAND 

Name: Combined Microcomputer User Group 
Address: P.O. Box 6210, Auckland, New Zealand 

Name: Commodore Users Group 

Address: Hazel Ave, Mount Roskill, New Zealand 

Name: Commodore User Group 

Address: New Zealand Synthetic Fuels Corp., Private Bag, 

New Plymouth, New Zealand 

N.T. 

Name: N.T. User Group 

Address: P.O. Box 1195, Nhulunbuy, NT, 5797 

Name: N.T. Commodore User Group 
Address: 349 McMillans Rd, Anula, NT, 5793 

TAS. 

Name: Hobart Commodore Users Organisation 
Address: GPO Box 391D, Hobart, TAS, 7000 


Continued from page 8 

and other electronic equipment. 

The home user or business person now has 
the opportunity to take the computer and all 
its necessary attachments (in one tidy 
package) where ever it can be of the most use 
and know that it will be well protected from 
sun, water and dust. 

Computer theft, a large industry in it's own 
right, has featured a great deal in the design of 
the Carrycom cases. The deliberate absence 
of a computer company logo or symbol 
makes these cases hard to identify from other 
travel luggage. The cases range in price from 
$120.00 for a briefcase size model up to 
$600.00 for those parties wishing to transport 
larger and heavier equipment. They even 
have a model with flip-out wheels. 

For further information cantact the 
company on Brisbane (07) 371 9515. 













THE ANATOMY OF 


THE COMMODORE 64 

is the insider’s guide to the lesser known features of the Commodore 64. 
Includes chapters on graphics sound synthesis, input/output control, 
sample programs using the kernal routines, more. For those who need to 
know, it includes the complete dissassembled and documented ROM 
listings. $29.95 

THE ANATOMY OF 
THE 1541 DISK DRIVE 

unravels the mysteries of using the misunderstood disk drive, details the 
use of program, sequential, relative and direct access files. Include many 
sample programs - FILE PROJECT, DIRECTORY, DISK MONITOR, 
BACKUP, MERGE, COPY, others. Describes internals of DOS with 
completely dissassembled and complemented listings of the 1541 
ROMS. $29 95 

TRICKS & TIPS FOR THE 
COMMODORE 64 

is a collection of easy-to-use programming techniques for the ’64. A 
perfect companion for those who have run up against those hard to solve 
programming problems. Covers advanced graphics, easy data input, 
BASIC enhancements, CP/M cartridge on the ’64, POKEs, user defined 
character sets, joysticks/mouse simulation, transferring data between 
comuters, more. A treasure chest. $29.95 

THE VIC CENTRE Postage Extra 

416 LOGAN RD STONES CORNER OLD .1 msSJTBl r r*_ 

PO BOX 18, STONES CORNER 4120. ADaCUS MSH bOltWaflB 
TELEX. 40811. TEL (07) 397 0888 


FOR COMMODO RE-64 
HACKERS ONIYI^H 


The ultimate source 
for Commodore-64 
Computer information 
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COMMODORE 64 


V>' 


IL 


Australian product by Bananasoft, Woodridge, Qld 
retail $45.00 


A 


PERFORMER 


TURBO-64 


NOTE: This product was previously known as TURBO- 
DOS but had to change its name for copyright reasons. 

TURBO 64, in short, reformats your disk so that the it 
will LOAD (and presumably SAVE) at 5 (five!) time the 
usual speed of the 1 541. 

Paul Blair has reviewed this product else where in the 
magazine. 



SPEED LOAD 


tOX 

THE NEW LOW COST PRINTER FOR 
THE COMMODORE 64 


SPEED LOAD speed up the 1541 and SX disk drives by 
a factor of 3 when loading programs. 

For details of this program refer News Releases 
section of the magazine. 


Features: 

© 120 CPS printing speed • Single sheet, roll or 
continuous paper © Standard. Italic, special and 
graphic character sets © Normal, condensed, elite, 
super and sub script © Low cost full featured 
printer for text or graphics © Logo and Koala print 
routine available. 


Distributed by Eureka Software of Niddrie Victoria at a 
retail price of $59.95. 


available from 

UhraPhasE Computers 

296 Doncaster Road 
Greythorn (North Balwyn) VIC 3104 
Phone (03) 857 4233 (03) 857 8026 


MR SOFTWARE, CHADSTONE 

719 Warrigal Roaa 
(Between Waverley Rd 
and Mulgrave F’way) 

Phone (03) 277 7600 
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Now you can turn your 
computer into a practical 
and useful instrument with 
the Velleman Interface System 
for the Commodore 64, 
Sinclair ZX81 and ZX Spectrum 



IT TURNS YOUR COMPUTER 
INTO A PRACTICAL AND USEFUL 
INSTRUMENT! 


The following interface cards are already available 
in Kit Form. 


K2609 - Outputboard. Provides your microcomputer with 
8 outputs which can be used for lightshows, 
process control or all kinds of switching applications. 
K2610 - A/D Converter. Enables you to read analogue values 
such as voltage, current, temperature, humidity, 
pressure, light intensity, position of axes, etc. 
K2611 - Optocoupler inputboard. Very appropriate for the 
supervision of alarm units, detection systems, 
switches and time registration on machines. 
K2614 - Centronics interface by means of which you can 
connect any centronics parallel printer to your 
microcomputer. 

K2618 - D/A converter. Generates an analogue voltage 
signal for servosystems (directing of antennas, 
spots, etc.), model construction controls, motor 
speed controls. 

K261 5 - Motherboard for ZX81 
K261 6 - Motherboard for ZX Spectrum 
K2628 - Motherboard for Commodore 64 
K2629 - CMOS Real Time Clock 


$48.26 


$64.96 

$51.97 


$74.24 


$64.96 

$64.96 

$64.96 

$76.10 

$72.38 


Sales Tax is included. 

Freight charge is $3.50 per order. 


CATALOGUE DETAILING FULL RANGE AVAILABLE ON REQUEST. 


DISTRIBUTORS WANTED 


FRED HOE and SONS PTY. LTD. 



246 Evans Road. Salisbury. 
— Brisbane. Qld 4107 
Telephone (07) 277 4311 
Telex 42319 


Bankcard and American 
Express Welcome 
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COMMODORE 64 
HIGH SPEED 
BACKADISK II 

BACKUP A DISK ON A SINGLE DRIVE IN 
4 MINUTES 

BACKUP MOST PROTECTED DISKS 

- Format a disk in 20 seconds. 

- Analyse a disk for errors. 

- Write errors 20, 21, 22, 23, 27, and 29. 

- Erase errors and reformat single tracks. 

- Writeprotect and un-writeprotect disks. 

The most common method of copy-protection used 
in commercial programs involves the use of 
software errors on the disk. BACKADISK II will 
make a workable backup of many “protected” 
disks thus allowing you to make a security copy 
of your valuable programs. Don’t risk the loss of 
your only word processor disk spreadsheet 
program or valuable games disks. Back them up 
for your own peace of mind. 

For more details send a S.A.E. 

Or to obtain your copy now, 
send $45 to 

BANANASOFT 

P.O. BOX 701 
WOODRIDGE QLD 4144 
PHONE (07) 200 5926 


MODEMS 

The 

CICADA 300CT 
Made 
especially 
for the 

Commodore Vic20 and 64 

Only $269 TAX PAID 

S2lfrfl e da,a with friends, user groups, bulletin boards, schools, main-frames 
databases, overseas. 

modems* 30 characters P er second) — the most widely used data speed for 

* p'* s d °th models of Commodore. Still right if you upgrade. 

owered by the Commodore — no awkward plug-packs or double adaptors. 

* approved too? 1 attached phone to P lu 9 straight into your phone socket. Telecom 
Includes data cable. No hidden costs. Nothing else to buy. 

m 44§ 8233 

ROSSER COMMUNICATIONS 
Suite 1, 2S Bridge St., Pymltie, N.S.W. 2013 

PS , o o'u b s r z%' nd mode,s 




















It’s How Much You Get. 




It’s Not Mow Little It Costs 

5 


At last, the world’s number one selling computer in a pack. The *a 

available in a family pack at a very affordable family price. $700 value foMust $499 YoiVaet 
the powerful Commodore 64, plus datacassette and joystick fourSoftware 
programs:Money Manager, An Arcade Game, Rolf Harris Picture Builder and 
Introduction To Basic(a teach yourself program) A qreat aift 
for the whole family who work and play together. 


.... = fs commodore - 

' COMPUTER 

Keeping up with you. 

Contact your nearest Commodore dealer or Commodore Business Machines: 
Sydney: (02) 427 4888 Melbourne: (03) 429 9855 Brisbane: (07) 393 0745 Perth: (09) 4781744 















